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Get * ( 

Organized: 

Tournament tracking, 
Freezer rotation schedules, 
And systematized yard sales 

Take a spring break: 

Down the Bunny Trail, 
Battlin' Blue Bert, 
And Saucer, Saucer 

Plus: 

H.G. Williamson's 

Hurricane Tracker, 

Edward Samuels on 

Copyright Law, and 

Bill Reed's 

Spreadsheets Made Simple 

Including: hints, tips, 
Q & A columns, 17 new 
product reviews and more! 
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Help 

Issue 
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Bouncing Boulders is a new, fast paced arcade- 
style game for your Coco. As you race your man 
around the screen you try to collect enough stars 
to open the exit to the next level. You can drop 
rocks to kill aliens that follow you around the 
screen trying to catch you. But beware of the fall- 
ing and bouncing boulders as they will crush your 
man if you get trapped under one. The many dif- 
ferent screens with lots of puzzles will keep you 
playing for hours on end. 
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You've asked for it and now it's here, a wrestling 
game for your color computer. Play a single match 
or play a tag team match in this 1 to 4 player game. 
Wrestle against the computer or wrestle against 
your friend in a single or tag team match. Use pun- 
ches, kicks, body slams, back breakers and many 
other moves as you attempt to pin your opponent. 
Super graphics and realistic play action make this 
a great game for all. 

$28.95 u.s. 
$38.95can. 
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Travel through lowns and ex- 
plore strange lands in the 
ultimate fantasy role-playing 
game for the color computer. 
As you travel the land you will 
meet different characters thai 
you may convince to join you in 
your quest. During your quest 
you will learn the secrets of 
magic spells and ultimately, 
your final goal. 

Enter The Gates of Delirium 
contest! The first person lo 
solve the game shall be our 
grand prize winner of a Coco 3. 
There will be 5 second prizes of 
one free game from Diecom 
Products and 5 third prizes of 
one free hat from Diecom Pro- 
ducts. 
64K 

required $38.95 u.s. 
$52.95 can. 

available on disk only 
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ALSO AVAILABLE 

— Paper Route, Knock Out, 
Karate, each game requiring 
64K. Tape or disk. 

$28.95 u.s. 
$38.95 can. 




6715 FIFTH LINE, MILTON, ONT., CANADA L9T 2X8 
We accept: 



choqus or money order 



24 hr. order line: 

(416) 878-8358 

personal service 9-5 



Please add $2 for shipping 
S handling. Ontario 
residents add 7% sales tax. 
C.O.D. Canada only. 
Dealer inquiries invited 
Looking for new software. 
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*rom Computer Plus to YOU . . 

S after PLUS after P 




Tandy 200 24K $649 
Tandy 600 32K $1,269 
Tandy 102 24KS395 
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Color Computer 3 
W/128K Ext. Basic $169 
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Tandy 1000 EX $479.00 
Tandy 1000 SX $759.00 




DMP-130 $269 










Color Computer Disk Drive 
Drive $239 Drive 1 $149 




DMP-105 $160 



BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 



COMPUTERS 

Tandy 1000 EX 1 Drive 256K 479.00 

Tandy 1000 SX 2 Drive 384K 759.00 

Tandy 3000 HL 1 Drive 512K 1229.00 

Model IVD 64K with Deskmate 889.00 
PRINTERS 

Radio Shack DMP-105 80 CPS 160.00 

Radio Shack DMP-130 100 CPS 269.00 

Radio Shack DMP-430 180 CPS 559.00 
Radio Shack DWP-230 Daisy Wheel310.00 

Star LV-1210 120 CPS 199.00 

Star NX-10 120 CPS 259.00 

Star SG-15 120 CPS 410.00 

Panasonic P-10911 160 CPS 299.00 

Panasonic P-1092 180 CPS 339.00 

Okidata 292 200 CPS 529.00 

Okidata 192 200 CPS 375.00 

Epson LX-80 100 CPS 275.00 

Epson FX-85 160 CPS 419.00 
MODEMS 

Radio Shack DCM-7 Modem 85.00 
Radio Shack DC Modem 

Program Pac 99.00 

Radio Shack DC Modem 212 179.00 

Hayes 300 Baud Modem 169.00 

CALL TOLL FREE 
1-800-343-8124 

• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

• KNOWLEDGEABLE SALES STAFF 

• TIMELY DELIVERY 

• SHOPPING CONVENIENCE 



COLOR COMPUTER MISC. 

Radio Shack Drive Controller 99.00 
Extended Basic Rom Kit 39.95 

64K Ram Upgrade Kil 39.00 

Radio Shack Deluxe Keyboard Kit 24.95 
HJL Keyboard Upgrade Kit 79.95 

COCO Max Y Cable 27.95 

Color Computer Mouse 44.00 

Multi Pack Interlace 89.00 

Botek Serial to Parallel Conv. 69.95 
Radio Shack CCR-81 Recorder 52.00 
Radio Shack Deluxe Joystick 26.95 

Amdek Video 300 Green Monitor139.00 
Amdek Video 300 Amber Monitor149.00 
Goldstar Green Monitor 85.00 

Panasonic Amber Monitor w/audio99.00 
Radio Shack VM-4 Green Monitor 99.00 
Mark Data Universal Video Driver 29.95 
COLOR COMPUTER SOFTWARE 

TAPE DISK 
Approach Control Simul. 29.95 34.95 
Worlds Ol Flight 29.95 32.95 

Mustang P-51 Flight Simul. 29.95 34.95 
Spectral Typing Tutor 19.95 22.95 

Dungeon Quest 24.95 27.95 



Major Istar 24.95 

Sam Sleuth Private Eye 24.95 
Mark Data Graphic Adven.24.95 
COCO Util II by Mark Data 
COCO Max by Colorware 69.95 
COCO Max II by Colorware 
AutoTermbyPXEComputing39.95 
TelePatch II by Spectrum 
Telewriter 64 49.95 

Deft Pascal Workbench 
Deft Extra 

Pro Color File Enhanced 2.0 
Max Fonts [72 COCO Max Fonts) 



Elite Calc 69.95 

Elite Word 69.95 

Elite File (disk only) 

DynaCalc (disk only) 

Word Pack RS by PBJ 

VIP Writer (disk only) 

VIP Integrated Library (disk) 

Order any 2 software pieces listed and 
fake 10% off their listed price. All Radio 
Shack software 10% off list. Send for 
complete list. 



27.95 
27.95 
27.95 
39.95 

79.95 
49.95 
29.95 
59.95 
99.95 
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P.O. Box 1094 
480 King Street 
Littleton, MA 01460 



SINCE 1973 



IN MASSACHUSETTS CALL (617) 486-3193 



TRS-80 is a registered trademark o( Tandy Corp. 
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w The cassette tape/disk symbols 
ISaJ beside features and columns indi- 
cate that the program listings with those 
articles are on this month's rainbow on 
TAPE and RAINBOW ON DISK. Those with 
only the disk symbol are not available on 
RAINBOW ON TAPE. For details, check the 

RAINBOW ON TAPE and RAINBOW ON DISK 

ads on pages 110 and 168. 



Enter the Fifth Dimension/floberf E. Laun 

TUTORIAL Five-dimensional arrays explained for all 

Tracking the Tempest//-/. G. Williamson, M.D 

WEATHER A perfect way to predict hurricane landfall 

Banishing Freezer Burn Blues/fioberf Giffard 

HOME HELP No more mystery meat surprises 

The Well-behaved Yard Sale/ Eric White 

HOME HELP Great for inventory control; prints price lags, too 

Explosive Word Fun/Kent Baumgardt 

GAME Better guess fast because the fuse is lit 

Disabling the Color Burst Signal/Robert Gault 

COCO 3 UTILITY Eliminate distortion on the screen 

A How-to Guide/Edward Samuels 

COPYRIGHT LAW Practical information on protecting your work 

It All Adds Up/Bill Carrigan 

HOME HELP An easy-to-use CoCo calculator 

Down the Bunny Trail/Laura and Chris Petit 

GAME A fun drill of pattern discrimination 

Battlin' Blue Bert/ James A. Noble 

GAME Woe be unto those he captures 

Saucer, Saucer/Jo/in T. Wells 

GAME The more you play, the trickier it gets 

The Tournament Master/ Richard Steinbruck 

ORGANIZATION Round robin tracking made easy 

The Write Stuff/8/// Cook 

COCO 3 UTILITY A simple word processor for the new CoCo 

Cipher Fun/John Collicot 

EDUCATION Positive rewards reinforce early math skills 

Counting With Caesar/ Thomas Hood 

EDUCATION Refresh your Roman numeral skills 

Plottin' and Plannin'/fi/'// Reed 

ORGANIZATION Spreadsheets have never been so simple 



NOVICES NICHED 

Graphics Trio 
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Randy Cassel 
Grocery 
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Donald Large 
Who's On First. 

John Fugh 
Recipe Printer, 

Keith March 
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Auto Economy 

J.E. Borger 

CoCo Yields The Floor 

Burt Gonce, Jr. 
Checks And Balances _ 

John Musumeci 



72 



120 



156 



166 



172 



174 



73 



74 



75 



NEXT MONTH: Screen dumps, graphics, dot matrix, cpi, near letter- 
quality, parallel, serial .... If these things set your mind a-whirl, then 
check out our May Printer issue. We uncover the mysteries of that 
indispensable peripheral and highlight its many capabilities. And, as 
usual, May's issue will be packed full of useful and interesting 
programs, utilities, games, reviews and much more! 

Discover the power of the printed word — discover the rainbow, 
the best information source for your Color Computer 1, 2 and 3! 



COLUMNS 



BASIC Training/ Joseph Kolar 

Exploring Co Co graphics 

Building April's Rainbow/Jo Anna Arnott . 
Associate Editor's comments 



CoCo Consultations/Marry Goodman. 
Just what the Dr. ordered 



112 



16 



186 



Delphi Bureau/Cray Augsburg 

Checking into Conference and Goodman 's database report 

Doctor ASCW/Richard E. Esposito 

The question fixer 

-z£ Education Notes/Stel/e Blyn 

Teaching line graphs 

Education Overview/M/cftae/ Plog, Ph.D 

Studies in learning transfer 

PRINT#-2,/ Lawrence C. Falk 

Editor 's notes 

Turn of the Screw/Tony DiStefano 

Transistor buffers 

-■^ Wishing Well/Fred B. Scerbo 

Co Co conquers the metric system 

RAINBOWTECH 



94 



161 



46 



86 



12 



88 
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r^ Bits and Bytes of BAS\C/Richard White 
Making the most of CoCo 3 features 

Downloads/Da/) Downard 



194 



189 



Answers to your technical questions 

KISSable OS-9/Oa/e L. Puckett 

Back to the beginning 

Memory Management/Pefer Dibble 



197 



192 



Understanding OS-9's memory system 

"Bar den 's Buffer " will return next month. 

DEPARTMENTS 



Advertisers Index 

Back Issue Information. 

Clubs, Clubs, Clubs 

CoCo Cat 

CoCo Gallery 

Corrections 



Letters to Rainbow 
One-Liner Contest 
Information . 



208 

137 

149 

.140 

_18 

128 

_6 



The Pipeline 

Rainbow Info 

Received & Certified 
Scoreboard Pointers 
Submitting Material 
to Rainbow 
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_14 

130 

183 



Subscription lnfo_ 
These Fine Stores 



_24 

_36 

206 



155 



PRODUCT REVIEWS 

Product Review Contents. 
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LETTERS TO THE WIMi© 




Some New Tricks 
from the Rainbow Trainer 



Editor: 

I think RAINBOW can leach an old dog new 
tricks. I'll be 73 this year and purchased a 
computer after I retired. I'm too old to learn 
programming but the information in RAIN- 
BOW shows me how to come up with a 
program I would like to write. 

In the December 1986 issue [Page 62], 
Ilene Fortin's program showed me how to 
make a card. In the December 1985 issue. 
Chuck Hawley [Page 7] wrote a screen dump 
program in his "Letter to the Editor." Put 
them together with graphics drawn in Old 
English and I think you can have a cute 
program for any type of card you wish to 
make. I save my programs on tape and add 
a new name when necessary. 

Retired people seem to be afraid to try 

playing with a computer. It's a whole new 

world and is a great help for keeping the 

mind alert. „. , _ ,, , 

Charles F. Muisener 

Newington. CT 



It All Crashes 



Ecliior: 

I'm interested in hearing from anyone 
who was able to get the program CON- 
VERT.64K by Jorge Mir in the October 
1983 issue [Page 3 17] to work. I haveaCoCo 
2 ECB that I upgraded to 64K. Everything 
works fine after 1 run the program until I try 
to make an entry, then all crashes. If you can 
help me, please write. 

Jo Ann Kara/fa 

220 Card A venue 

3rd Floor 

Wilmerding. PA 15148 



New Kid on the Block 

Editor: 

The January 1987 columns from Lonnie 
Falk and Jim Reed were excellent. When 
something decidedly better comes along 
(like the CoCo 3) I also want it. Retiring the 
old gray CoCo will be difficult, but I'll soon 
be doing it. 

6 THE RAINBOW April 1987 



Jim's article on meeting the CoCo 3 
challenge was also very good, but I have a 
few reservations about the enthusiasm of a 
few of your advertisers. My hat is off to 
advertisers like J&M Systems LTD, Spec- 
trum Projects and others for ads that address 
the CoCo 3. There's a new kid on the block 
out there called CoCo 3 — it's time for the 
ads to reflect which model computer their 
product is for and discuss compatibility. I'm 
sure that there are a lot of hackers out there 
who will be joining the challenge to solve 
some of these third party incompatibility 
problems. In the meantime, advertisers 
should update their ads so potential custom- 
ers are given more answers than questions. 
Roger Rosenquist 
Southborough, MA 01772 



such as local BBSs or national 
information networks, also pro- 
vide avenues for review of these 
programs. 



Public Domain Reviews 

Editor: 

I have been a reader and fan of rainbow 
for four years. It has been indispensable for 
me. 

Why don't you have any reviews of public 
domain software in RAINBOW? This would 
be of great value to your readers and to all 
Delphi/ CoCo members. 

Chuck Silver 
Portland, ME 

Two reasons: First, we feel that 
the primary purpose of our reviews 
should he to help you make a 
decision on what programs you 
wish to purchase, in order to get 
the most for your investment. 
Second, any truly public domain 
programs are public property and 
subject to modification and alter- 
ation such that no standard, "offi- 
cial" version really exists for re- 
view purposes; we might review 
one version only for you to acquire 
a different version, since anyone 
can change these programs with- 
out regard to the original author's 
wishes. 

Our observation is that sources 
offering public domain programs. 



HINTS AND TIPS 



Editor: 

Here is a tip for people who have a CoCo 
3 and would like to use basic programs that 
were written for the CoCo 1 or 2. Just insert 
WIDTH 32 as a command at the beginning 
of the program and resave it. They should 
then work no matter which text screen you 
run them from. 

Does anyone know how to change the 
default baud rate of the CoCo 3 printer port 
to 2400? Any help will be greatly appre- 
ciated. , , , 

Andy Leary 

19 Oak Drive 
N. Stonington, CT 06359 

Try POKE 150,18. For more de- 
tails, see the Hint on Page 24 of this 
issue. 

Border Blackout 

Editor: 

Here's a way to black out the border on 
VIP Writer's Hi-Res screen. I know it's 
something everyone has wanted to do and 
it's possible on the CoCo 3. Save the follow- 
ing programs to your VIP Writer disk: 

10 'DOS.BflS 

20 CL5 

40 POKE 353, 57: POKE 65314,60 

70 POKE &HE033,PEEK(&HE033) OR 

&H10 
90 PRINT"Noui RUN program W" 

10 -W.BH5 
20 PALETTE 9,0 
30 PHLETTE 8,63 
40 PHLETTE 11,63 
50 PALETTE 10,0 
60 LOflDM"URITER 

Now type RUN"D0S; it will prompt you to 
type RUN"W. Last, type C from the command 
mode and you can feast your eyes on the way 




AUTOTERM 

TURNS YOUR COLOR COMPUTER INTO THE 

WORLD'S 
SMARTEST TERMINAL! 

YOU'LL ALSO USE AUTOTERM FOR SIMPLE 
WORD PROCESSING & RECORD KEEPING 
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NOW HI-RES 



EASY COMMUNICATION + WORD PROCESSING + TOTAL AUTOMATION 



Full prompting and error checking. 
Step-by-step manual has examples. 
Scroll text backward and forward. No 
split words on screen or printout. 
Save, load, delete files while on line. 
Print, save all or any part of text. 
XMODEM for machine language 
files. 128 ASCII characters, 1200 
baud, etc. Works with D.C. Hayes or 
any modem. Handles files larger 
than memory. Print on line with J&M 
or RS232 Pak. Screen widths of 32, 
40, 42, 51, 64. 



Please hire the mentally retarded. 

They are sincere, hard working and 

appreciative. Thanks! _. „. 

Phyllis. 



Editing is super simple with the 
cursor. Find strings instantly too! 
Insert printer control codes. Specify 
page size and margins. Switch 
quickly between word processing 
and intelligent terminal action. Create 
text, correct your typing errors; then 
connect to the other computer, 
upload your text or files, download 
information, file it, and sign-off; then 
edit the receive data, print it in an 
attractive format, and/or save it on 
file. Compatible with TELEWRITER. 

CASSETTE $29.95 
DISKETTE $39.95 

Add $3 shipping and handling 
MC/VISA/C.O.D. 



Advanced system of keystroke 
macros lets you automate any 
activity, such as dial via modem, 
sign-on, interact, sign-off, print, save. 
Perform entire session. Act as 
message taker. At start-up, disk 
version can automatically set 
parameters, dial, sign-on, interact, 
read/write disk, sign-off, etc. Timed 
execution lets AUTOTERM work 
while you sleep or play. No other 
computer can match your COCO's 
intelligence as a terminal. 

PXE Computing 

11 Vicksburg Lane 
Richardson, Texas 75080 

214/699-7273 



an inverse screen is supposed to look. Note: 
don't combine the programs into one pro- 
gram; for some reason it will not work. 

Doug Thorsvik 
Biloxi, MS 



A Grab Bag of Help 

Editor: 

The program Lovecard on Page 36, Feb- 
ruary 1 987 issue, will work on the CoCo 3 
by changing lines 1 00 and 220 to EXEC 
44539. 

A friend has shown me how to boot OS- 
9 Version 01.01.00 on the CoCo 3. Run the 
Boot program, then insert an OS-9 disk such 
as Rocky 's Boot and press a key. When it 
loads, remove it, insert your OS-9 disk and 
press reset. OS-9 comes up ready for use. 

VIP Database works on the CoCo 3 under 
J DOS. You can use JDOS on the CoCo 3 
by the following procedure. Switch the 
system on. The JDOS logo or garbage will 
come on according to your version. Press the 
break key twice, the Auxiliary Selection 
Menu will come up. Press 9. This was meant 
to load the Memory Minder disk drive 
analysis program into RAM but it loads the 
ROM into RAM and you are ready to 
operate in JDOS. JDOS does not recognize 
the new commands for the CoCo 3. 

I hope these hints will help someone. I 
enjoy the RAINBOW and would like some 
truly beginner instruction programs on OS- 
9 such as how to get a program up and 



Easy Access 

Editor: 

As a rainbow subscriber since June 1984, 
I have about 33 issues of this great magazine 
on file. To save lime finding small articles, 
hints, reviews, questions and answers or 
one-liners that are not listed in the Table of 
Contents, I use a self-stick address mailing 
label which attaches to the front cover where 
it doesn't cover any printing or graphics. 
This can be used to list the desired article, 
a small description and the page number of 
articles that are of special interest to me. It 
saves me time and frustration in locating 
things I know I read in back issues. 

Joe Perevosnik 
Parma, OH 



running. 



Ernest D. Wilkes 
Macon, GA 



COCO 3 

Editor: 

If a CoCo-PC card can be made for IBM 
compatibles (I'm referring to Compusense's 
advertisement in the January 1987 issue. 
Page 95), then it's only fair that they also 
make a ROM pack card to plug in the 
MultiPak so that the CoCo can run IBM 
compatible software. 

How about it? The CoCo 3 has the same 
high resolution and memory capabilities as 
the IBM so let's have some hardware and 
software that will let us emulate IBM. Also, 
whatever happened to the CP/M ROM Pak 
that used to be advertised for the CoCo? 

The CoCo's no kid any more. Let's see 
some FORTRAN, COBOL, Modula-2, Ada 
and Prolog software. Also, let's have some 
Apple, Commodore and Atari emulators. 



Turn about is fair play. They've had their 

fun at our expense long enough, it's our turn 

now. Let's show them what the CoCo can 

really do! _, . , „ , , 

Donald R. Adams 

Kokomo, IN 

A Vote of Confidence 

Editor: 

As I sit here at my CoCo 3 using VIP 
Writer, I'm amazed at all the negative 
comments about Tandy's latest offering. I 
own a CoCo I, which was upgraded to 64K, 
and a 64K CoCo 2; the worst thing I can say 
about the CoCo 3 is that it will take some 
getting used to. 

I have the old gray drives and multipack, 
and using the information in the January 
rainbow I changed the PAL chip. Now the 
disks work perfectly and the whole VIP 
Library seems to run as it's meant to. At least 
I have yet to find any bugs. As for more keys, 
I have four just sitting here that Tandy 
forgot to mention in their manual, and the 
old CoCos had all the keys I could keep up 
with. I wouldn't be surprised if Tandy made 
the extra alphanumeric characters available 
from the keyboard in the near future. It 
would be nice if they would drop you a line 
and explain what to do with the alt and 
CTRL keys. 

So far I've found that the shift-alt 
combination will repeat the last function 
used in VIP Writer. 

Richard M. Johnson 
Clifton. CO 
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REQUEST HOTLINE 

Editor: 

Does anyone know of a program lo keep 
track of a slock portfolio that would work 
on my 64K CoCo 2 with cassette? 

John G. Wood 

8 While Birch Court 

Schenectady. N Y 12306 

Check out "See How Your Stocks 
Stack Up "in the March 1987 issue. 
Also, our March 1984. 85. 86 and 
87 Business/ Finance issues all 
have related programs, including 
"Stock Index" (March 1985. Page 
170). 

The CoCo Landlord 

Editor. 

I would like to know if you have any tapes 

relating to rental property. I am interested 

in being able to keep a ledger and journal 

on rental property plus spreadsheets, etc. I 

have a 64 K CoCo. „ . „ r .. 

Barbara E. earns 

2678 Floribunda Drive 

Columbus. OH 43209 

You need "Landlord's Helper." 
which appeared on Page 106 in our 
March 1985 issue. 

Parlez-vous CoCo? 

Editor: 

I am looking for some foreign language 
software, particularly Spanish or French. 
Can you tell me if there is anything available, 
and who I should write to for more infor- 
mation. 

Dorothy M. Conniff 

1614 N. Hermitage Road 

Ft. Myers. FL 33907 

See Dorset! Educational Systems 
Introductory Spanish Courses 
review on Page 146 of this issue. 

Looking for a Hitchhiker 

Editor: 

Is there a version of Hitchhiker's Guide to 
the Galaxy available for a 64K cassette 
based system? 1 am looking for a golf game 
similar to the one that is currently in the 
arcades with real time action and a version 
of Leader Board that is for the same system. 
Leader Board does exist for the Commo- 
dore. Also, any information or help on 
where lo find a screen-dump for an Okidala 
Microline 92? Responses would be greatly 
appreciated. 

Frank A. Mazotti. HI 

107 Clearview Drive 

N. Syracuse. NY 13212 

CoCo Kegler 

Editor: 

I have a 64K CoCo 2 with a cassette 

recorder and a printer. 1 am looking for a 

company that sells a bowling game. Does 

anyone know of one? . , _ 

Andy Rostar 

308 Prince Road 

Greenville. NC 27858 



BOUQUETS 

Editor: 

1 would like to express my appreciation 
and satisfaction for the outstanding service 
and speed from Canyon County Devices. I 
found their advertisement in your December 
1986 issue after a long search through 
several other sources to find colored ribbons 
for my SG-IO printer. Outstanding service, 
quality products, who could ask for more? 

John S. Taylor 
Wausau. Wl 



A+ for Promptness 

Editor: 

Cray Augsburg's hardware review [Oc- 
tober 1986, Page 148] of the Seikosha SP- 
I000A printer [furnished to rainbow by 
Cinsofl, Inc.] convinced me. I ordered the 
I000A from Metric Industries, Inc., Cincin- 
nati, Ohio on Tuesday. The printer was at 
my front door on Friday. Subsequently, on 
a Wednesday, I ordered several extra rib- 
bons for the printer; the ribbons arrived on 
Monday. Hurrah! for this company. It's nice 
lo know that there are still some people like 
Metric around who provide good customer 
service. 

Milton W. Kurtz 
Baltimore, MD 



KUDOS 

Editor: 

I just want to compliment the author of 
AVTOTERM. The program does much more 
than advertised, it is much better lhan I 
expected. 

Curtis E. Barmes 
Ladd. 1L 

Found Pot-of-Gold 

Editor: 

I bought a new CoCo last year and have 
since added a CCR-82 cassette recorder and 
a DMP-130 printer. 1 discovered RAINBOW 
last November and have been fortunate 
enough to locale some back copies. I have 
enjoyed typing in the programs and partic- 
ularly the games which my grandchildren 
and 1 enjoy playing. I want to compliment 
you on your program format. It's easy on the 
eyes. I read Eugene Vasconi's excellent 
article on the "Bug Zone" in the January 
1987 issue [Page 58] and I want lo tell you 
I've been there. I appreciate your recogni- 
tion that there are beginners out here. I have 
found a wealth of information in your 
"Rainbow Tech" and "Letters to Rainbow" 
departments. From a retiree of 10 years and 
a senior citizen pushing 70 — keep up the 

Chester E. Bidigare 
Ml. Clemens. MI 

The Doctor Was Right 

Editor: 

I was glad lo see Dr. Marty Goodman's 
comment on the Multi-Pak interface in 
September 1986 [Page 178] "CoCo Consul- 
tations." I bought CoCo Max 11 in January 



along with a Y box. I had lots of trouble with 
it and tended to blame it on CoCo Max. On 
the strength of Marty's comment in rain- 
bow, I sent for a Multi-Pak interface from 
one of your advertisers. It made a tremen- 
dous difference, worked perfectly and so did 
CoCo Max. I had never before read any- 
thing that so much as suggested thai Y cables 
and Y boxes were not in every way as good 
and effective as the Multi-Pak interface, 
although I have only been a regular reader 
of RAINBOW since November 1984 and could 
easily have missed a comment in some 
earlier issue. Dave Otis 

Montpelier, VT 

It's a Pleasure 

Editor: 

It is a pleasure for me to read the Kudos 
letters. The writers praise the prompt atten- 
tion given them by your many advertisers. 
My letter is different. I am praising the 
responsibility and the prompt attention 
given to me by the world's greatest Color 
Computer magazine — RAINBOW. 

I receive my copy of next month's issue 
of the rainbow by the middle of each 
month. My December issue never arrived. 1 
waited patiently till the first week of De- 
cember at which time I wrote to Falsoft. 
Shortly thereafter my doorbell rang. Upon 
opening the door, there stood a man from 
United Parcel Service who handed me my 

precious December issue. „ , ., 

1 Bob Nevtn 

Bayside, NY 



PEN PALS 



• I'm 16 years old and interested in hearing 
from fellow game nuts. I have a CoCo 1 and 
2, disk drive, cassette recorder, Prowriter 
8510 printer and lots of games. I am also 
interested in music programs. 

Daniel Bouges 

26 Park Place 

Niantic. CT06357 

• I am 16 years old and looking for a pen 
pal. I have a 64K CoCo I, cassette player, 
printer, modem, and lots of games and 
utilities. I am also looking for a screen dump 
program for the DMP-105. 

Chuck Aldrich 

P.O. Box 225 

Magnolia. DE 19962 

• Any Color Computer 1, 2 or 3 users 
interested in joining a program/ pen pal 
club? For more information, call me at (8 1 3) 
530-5349 or write me. Dino Sanchez 

2070 62nd Street N. 

Apt. 1503 

Clearwater. FL 33520 

• I have a CoCo 2 with one disk drive, 
modem, printer and tape. I am 16 years old 
and love all kinds of Adventure games. 

Peter J. Hernandez, Jr. 

237 N.E. 110 Terrace 

Miami, FL 33161 
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500 

POKES, 

PEEKS, 

EXECs 

FOR THE TRS-80 COCO 




NEVER BEFORE has this infor- 
mation of vital significance to a 
programmer been so readily 
available to everyone. This book 
will help you GET UNDERNEATH 
THE COVER' of the Color Com- 
puter and develop your own MI- 
QUALITY Basic and ML pro- 
grams. 50 WHY WAIT?? 
This 80-page book includes 
POKES, PEEKs and EXECs to: 

* Autostart your basic programs 

* Disable Color Basic/ECB/Disk 
Basic commands like LIST, 
LLI5T, POKE, EXEC, C5AVE(M), 
DEL, EDIT, TROn. TROFr". 
PCLEAR, DLOAD. RENUM, PRinT 
USING. DIR. KILL. SAVE, LOAD, 
MERGE, RENAME. DSKINI, 
BACKUP, DSKI$, and DSKO$. 

* Disable BREAK KEY. CLEAR KEY 
and RESET BUTTON. 

* Generate a Repeat-key, 

* Transfer ROMPAKS to tape (For 
64K only). 

* Speed Up your programs. 

* Reset, MOTOR ON/OFF from 
keyboard. 

* Recover Basic programs lost by 
NEW. 

* Set 23 different 
GRAPMIC/SEMIGRAPMIC modes 

* Merge two Basic programs. 

* AND MUCH MUCH MOKEIII 

COMMANDS COMPATIBLE WITH 
I6K/32K/64K/COLOR BASIC/ECB/DISK 
BASIC SYSTEMS and CoCo 1.2.BC3. 

ONLY $16.95 



*fc* 



***** 

^T^ r ONLY 



$9.95 



L U U additional Pokes, Peeks ' n Execs to 
give you MORE PROGRAMMING POWER 
Includes commands for 

• Rnmpak Transfer to disk 

• PAINT wilh 65000 styles! 

• Use ol 40 track single/double sided drives with variable 
step- rates 

• High-Speed Cassette Operation 

• Telewriter 64'. Ed!asm+' and CoCo Max' 
Enhancements 

• Graphics Dump (lor DMP printers) & Text Screen Dump 

• AND MUCH MUCH MORE! 

• 500 POKES. PEEKS 'N EXECS is a prerequisite 



DISK TUTORIAL 




(2- Disk Package) 



*& 



An indispensable tutorial for serious disk 
Basic/ML programmers Gives almost 
everything you MUST know about the disk 
system Some features: 

• Learn about track/sectors/ granules 

• How the Directory is organized 

• Useful disk utilities 

• Useful ROM routines 

• How to use double sided/40/80 track drives 

• Information security on disk 

• Insight into common disk errors 

• Many Tips/ Hints/ Secrets you won't find 
elsewhere! 

• And Much Much More! 



CoCo1.2&3 



only $36.95 



RUN COCO MAX II 
On CoCo III 

The kit contains software & replacement 
PAL chip for 26-3024 Multipack interface 

only $29.95 



MJF 




The CoCo Graphics Designer allows you 
to create beautifully designed Greeting 
Cards, Signs and Banners for holidays, 
birthdays, parties, anniversaries and other 
occasions Comes with a library of pre- 
drawn pictures Also includes utilities 
which allow you to create your own 
character sets, borders and graphic 
pictures. Requires a TRS-80 COLOR 
COMPUTER I, II OR III OR TDP-100 with 
a MINIMUM OF 32K, ONE DISK DRIVE 
and a PRINTER, compatible with DISK 
BASIC 1.0/1.1, ADOS 1.0/1.1 AND JD0S. 
Supports the following printers: EPSON 
RX/FK GEMINI 10X/SG-10, NX-10, 
C-ltoh 8510, DMP-1 00/1 05/400/430, 
SEIK0SHA GP-100/250, LEGEND 808 
and GORILLA BANANA 

DISK ONLY $29.95 
PICTURE DISK #1 

This disk includes OVER 100 pre-drawn 
pictures for use with the CoCo Graphics 
Designer. 

DISK ONLY $14.95 



512K UPGRADE 

Fo CoCo III. Easy Installation. 

ONLYS99.95 
Upgrade W/0 Chips- S44.95 

512K RAMDISK 

Have two super-fast in-memory disk drives. 

Requires 51 2 K CoCo III. 

ONLY $24.95 




MICROCOM SOFTWARE 

P.O. Box 214 
Fairport, N.Y. 14450 
Phone (71 6) 223-1477 



COCO DISKZAPPER 




Are you frustrated with crashed disks? If 
so, this program can save hours of labor by 
restoring complete or part of the information 
from the disk. If s indespensable! 

Requires minimum 32K/64K disk system 

CoCo 1,2 &3 ONLY $24.95 



VISA MC, Am Ex, Check M0. Please add S3.00 shipping and handling (USA & 
CANADA other countries S5.00). COD add $2.50 extra NYS residents please add 
Sales Tax Immediate shipment Dealer inquiries invited 



Call Toll Free (For Orders) 1 -800-654-5244 9 am- 9 pm est 7 days a week 

Except NY. For information, technical information NY orders & after-hours 1-71 6-223-1 477 



• I would like to get in touch with other 
CoCo users around Tampa. Call (813) 920- 

557 L Andy Ellinor 

Tampa, FL 

• I would like to know if there are any 
CoCo users in Montgomery County who 
would like to have a pen pal. I have a CoCo 
1 with 16K ECB and tapes. I am about to 
get a CoCo 2 with 64K. I am 14 and go to 
Sherwood High School. 

Michael DiGiovanni 

4008 Clover Hill Terrace 

Olney, MD 20832 

• I own a 64K ECB CoCo with 1 disk drive 
and a cassette player, and 1 would like to 
have a pen pal. chjp puUlzer 

BoxX 

Palmer Hill Road 

Au Sable Forks, NY 12912 

• 1 live in Kaiserslautern, Germany, and 
want to meet other CoCo enthusiasts who 
live around the world. Please write. 1 have 
a few interesting OS-9 files that 1 have 
written (along with a Dragon translator). 

Chris Ahrendt 

Psc Box 997 

APO, NY 09130 

• I have just arrived in Germany and 1 am 
looking for other CoCo nuts that are in the 
service. I am at Herzogenaurack near 
Nuernberg. I have a 64K CoCo 2, two disk 
drives, printer, Multi-Pak and cassette. 

SFC Edward Mac Kay 

HHB 2 Wih FA Bde 

APO, NY 09352 

• It's sad to be alone; all of my friends have 
either Commodores or IBM clones. Any of 
you CoCo nuts who are interested in sharing 
public domain software (especially Adven- 
tures) or who live in the Fayetteville area, 
please write me. Drgw Nonis 

Rt. 3, Box 424- C 
Fayetteville, NC 28306 

I'm 13 years old, have a CoCo 3 and I'm 

David Little 

208 W. Garden Street 

Landis, NC 28088 



By the way, have you hugged your CoCo 

toda y ! Tony Fortino 

6805 S. 'G' Street 

Tacoma, WA 98408 

• I am looking for pen pals that are inter- 
ested in any Adventures and all forms of 
heavy metal. Jjm Doy , e Jf 

P.O. Box 9 

Barrackville, WV 26559 

• I am 27 years old and would enjoy ex- 
changing letters with a computer pen pal. I 
have a 128K. CoCo 3, RGB monitor, disk 
drive, cassette recorder, printer and modem. 
Because your outstanding magazine has 
been so helpful to my understanding of the 
CoCo, I would like to pass on the favor by 
helping beginners who might be learning 
BASIC or assembly language programming. 

10 PRINT "THANKS" 
20 GOTO 10 David Milts 

2236 Washington Avenue 
Huntington, WV 25704 

• Do you need help on your Adventure 
games? Maybe you need one last treasure or 
a key word to open a locked door. I have 
solutions to 57 out of 135 Adventure games. 
I need help too. Let's help each other. Please 
send an SASE. g Mafl 

715 56th Street 
Vienna, WV 26105 

• Anybody wanting a CoCo pen pal, please 
write to me. I have a64K ECB CoCo 1, disk 
drive, DMP-105 printer and a cassette 
recorder. Man . Andreessen 

Rt.2, Box 103 W 
New Lisbon, Wl 53950 

• I'd like to find a pen pal in Alberta who 
is below the age of 20, has 64K, one drive, 
DMP-105 printer and knows something 



looking for pen pals. 



• I am 15 years old and have a 64 It ECB 
CoCo, FD-501 disk drive, DMP-105 printer 
and a CCR-82 tape system and want to 
correspond with all you CoCo nuts out 

lhere - Chris Curtis 

Route 7 
Walling, TN 38587 

• I would like to have some pen pals. I own 
a CoCo 3 and I'm interested in hearing from 
other people with the new computer. 

Dave Bell 
161 '/i South 300 East 
Smithfield, UT 84335 

• I will answer all letters that are sent to me. 
I am 1 5 1/2 years old. I have a 64K CoCo 2, 
cassette recorder, printer and over 200 
games on tape. 1 also love good Adventures. 



about programming with EDTASM+ (c&rt- 
ridge). The last isn't very important but I'm 
not too great at machine language program- 

min 8- Douglas Cosh 

Box 456 

Olds, Alberta 

Canada TOM IPO 

• I would like to have some pen pals. I have 
a CoCo 2 and 3, disk drive, modem, printer 
and cassette. We could talk about the newest 

S ames - Jim Kung 

132-43 Avenue N. W. 

Calgary, Alberta 

Canada T2K 0H6 

• I am 14 years old and looking for a girl 
pen pal who lives in the United States or 
Canada. I have a CoCo 2 and I'm hoping 
to get a disk drive soon. I'm interested in 
almost all subjects of life and I have a good 
sense of humor. Marc Hodgson 

RR 1. 8th Line 

Georgetown, Ontario 

Canada L7G 4S4 



THE rainbow welcomes letters to the 
editor. Mail should be addressed to: Letters 
to Rainbow, The Falsoft Building, P.O. Box 
385, Prospect, KY 40059. Letters should 
include the writer's full name and address. 
Letters may be edited for purposes of clarity 
or to conserve space. 

Letters to the editor may also be sent to 
us through our Delphi CoCo SIG. From the 
CoCo SIG> prompt, type Rfll to take you 
into the Rainbow Magazine Services area of 
the SIG. At the RAINBOW> prompt, type 
LET to reach the LETTERS> prompt and 
then select Letters for Publication. Be sure 
to include your complete name and address. 



ARTS AND LETTERS 



:3aqe RadnclioiwAy j ?M«Tf^iSi| 
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Envelope of the Month 



Sage Radachowsky 
Bantam. CT 
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UTILITIES/BOOKS 



UTILITY ROUTINES for the 
TANDY &TRS-80 COCO (Vol 1) 

• COMMAND KEYS • CURSOR STYLES • ERROR SKIP 

• FULL LENGTH ERRORS • KEY CLICKER 

• REPEAT KEY* REVERSE VIDEO (Green & Red) 
SPOOLER • SUPER SCROLLER • TAPE-TO-DISK 

• AND MUCH MUCH MORE HI 

For 16K/32K/64K Cassette or Disk Systems, 

CoCo1,2&3 BOOK $19.95 

ROUTINES ON CAS/DISK:$24.95 

BOTH BOOK AND CAS or DISK $36.95 

UTILITY ROUTINES (Volume II) 

Includes 20 oft- used utilities such as: 

• PAINT with 65000 styles 

• Add SUPERSCRIPTS to your DMP printer 

• Design your own commands! • Programming Clock 

• Fast Sort lor Basic Strings • CoCo Calculator 

• Create a character set lor your DMP printer 

• Find/ Replace phrases in your Basic Program 

• Let the computer locate your errors! 

• Super E D 1 Ting Basic Programs 

• Automatic Directory Backup • And much much more! 

64K DISK ONLY $29.95 

UTILITY BONANZA I 

Includes 20 best-selected utilities: 

• 40 K Disk Basic • Disk Cataloger 

• Super Tape-to-Oisk Copy (with Automatic Relocate! 

• LList Enhancer • X- Ret lor Basic Programs 

• Graphics Typesetter (two text sizes!) 

• LARGE OMP Graphics Dump • Basic Stepper 

• Hidden 32 K | Use the " hidden" 3 2 K Irani your 64 K CoCoj 

• RAM Disk (lor Cassette & Disk Users) 

• Single Key Printer Text Screen Dump 

• And much much more!!! 

Most programs compatible with CoCo 3 

DISK(64KReq) ONLY $29.95 

"MUST" BOOKS 

UNRAVELLED SERIES: These books provide a 
complete annotated listing of the 
BASIC/EDB and DISK ROMs. 

EXTENDED COLOR BASIC UNRAVELLED: S39.95 

DISK BASIC UNRAVELLED: SI9.95 

BOTH UNRAVELLED BOOKS: S49.9S 

SUPER ECB(CoCo3) UNRAVELLED: S24.95 

ALL 3 UNRAVELLED BOOKS: S59.95 

RAINBOW GUIDE TO OS-9 (Book): $18.95 

RAINBOW GUIDE TO OS-9 (2 Disks): S29.00 

BASIC PROGRAMMING TRICKS: Tips and tricks (or Basic 

Programmers Only SI 4.95 

CoCo 3 SECRETS REVEALED: S16.95 

ASSEMBLY LANGUAGE PROGRAMMING': SIB.OO 
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ALL SOFTWARE COMPATIBLE WITH COCO 1, 2 & 3 

(Except those marked with *) 
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SUPER TAPE/DISK 
^ TRANSFER 




• Disk-to- Disk Copy (1 -3 passes) 

• Tape- to- Disk Copy 

• Tape-to- Disk Automatic Relocate 

• Disk-to- Tape Copy 

• Tape-to- Tape Copy 

Copies Basic/ M L programs and DATA files. 

CoCo1,2&3 32 K Disk System 

(Disk to Disk Copy requires 64 K) 

DISK ONLY 

$24.95 



CABLES/HARDWARE 

AVATEX MODEM: Hayes compatible 

300/1200 Baud, Auto- Dial/ Answer/ Redial. 

ONLY $129.95 

MODEM CABLE: S19.95 

DS-69B DIGISECTOR: Microworks Digitizer 

for CoCo 1, 2 & 3. Includes software. 

ONLY $149.95 

VIDEO CLEAR: Reduce TV interference. 

0NLYS19.95 

15' PRINTER/MODEM EXTENDER CABLE: 

ONLYS16.95 

UNIVERSAL VIDEO DRIVER: Use your 

monochrome or color monitor with your 

CoCo (ALL CoCos). Includes audio 

connection Easy installation- no 

soldering. ONLY $29.95 

INTRONICS EPROM PROGRAMMER: Best 
EPROM Programmer for the CoCo. 
Lowest Price Anywhere- $137.95. 

RS232 Y CABLE: Hook 2 devices to the 
serial port ONLY SI 8.95. 

3-POSITION SWITCHER: 

Select any one of three RS232 devices 

(printers/ modems) from the serial port 

0NLYS37.95 

Y CABLE: Use your Disk System with CoCo 

Max DS69, etc ONLY S24.95 

SERIAL TO PARALLEL INTERFACE: With 6 
switch selectable baud rates (300-9600). 
Comes with all cables $39.95 



OTHER SOFTWARE... 

Telewriter-64 (Cas)$47.95 (Dsk) 57.95 

Teleform: Mail Merge for TW-64® 19.95 
Telepatch III 29.95 

Telepatch II* 29.95 

CoCo Max(Cas)* 67.95 

CoCoMaxll(Dsk)* 77.95 

CoCo Max Upgrade (Dsk)* 18.95 

Autoterm Terminal Prog ( Cas) 29.95 

(Latest Version) (Dsk) 39.95 

Graphicom II 22.95 

SPIT'N IMAGE: Makes a mirror image 
( BACKUP) of ANY disk even protected ones 
Will also initialize and BACKUP in one pass. 
ONLY $32.95 

COCO UTIL II (Latest Version): Transfer CoCo 
Disk files to IBM compatible computer. 
Transfer MS-DOS files to CoCa 
CoCo1,2&3 ONLY $36.95 

EARS: Speech recognition system. 
ONLYS99.95 

SUPER VOICE: Speech synthesizer. 
ONLYS79.95 

LYRA: Best music composition program 
ONLY $54.95 

SYMPHONY 12: A real hardware music 
synthesizer. ONLY $69.95 
ADOS: Advanced disk operating system 
ONLYS27.95 

DISK ANTI-PIRATE: Best copy- protection 
program for disk Basic and ML programs. 
CoCo1,2&3 ONLY $59.95 
COLOR SCRIBE III: The Coco 3 Word- 
Processor 
ONLY $49.95 

GAMES (DISK ONLY) 
GANTELET: S28.95 
MISSION F-16 ASSAULT: S28.95 
MARBLE MAZE: S28.95 
PAPER ROUTE: $28.95 
KNOCK OUT: $28.95 
KARATE: $28.95 
WRESTLE MANIAC: $28.95 
BOUNCING BOULDERS: S28.95 
THE GATES OF DELIRIUM: $28.95 
P-51 MUSTANG SIMULATION: S34.95 
WORLDS OF FLIGHT: $34 95 
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MICROCOM SOFTWARE 

P.O. Box 21 4 
Fairport, N.Y. 14450 
Phone(716) 223-1477 



Toorder All ordersS50 & above shipped by2nd day Air UPS with no extra charge. Last minute shoppers 
can benefil VISA, MC, Am Ex, Check, MO. Please add S3.00 shipping and handling 
(USA& CANADA other countries S5.00) COD add $2.50 extra NYS residents please add 
Sales Tax Immediate shipmenl Dealer inquiries invited. 



Call Toll Free (For Orders) 1 -800-654-5244 9 am- 9 pm est 7 days a week 

Except NY. For inlormatioa technical information NY orders & after-hours 1 -71 6-223-1 477 
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A Few Bad Apples 

Can Spoil Community Spirit 



it: 



has been quite a while since I have written on this particular subject, but 

"a couple of things have happened in the past few weeks, so I suppose it 

/is indeed time to talk about it again. 

Recently, 1 got a letter from a young woman who had previously written to 

us asking that her name be included in our "Pen Pal" section. She thanked us 

for doing so because she had met a number of interesting people — but was 

concerned about some of the letters she had received. 

"Several of them," she wrote, "were pretty much nothing more than offers to 
swap software. One of the people even had a mimeographed list of software he 
had and was willing to swap for software he didn't have. He sure had a lot of 
stuff. Most of it was stuff that I see for sale. He even had stuff from THE RAINBOW 
on the list. 1 thought you couldn't swap this kind of stuff. Is that right? Or can 
you?" 

Just the other day, Jim Reed walked into my office to report a "little research 
project." It seems that several people had called BBSs in their towns — one was 
operated by a CoCo Club — only to find that there was a great deal of commercial 
software available on two of them. 

Jim called the operators of the boards. One said he didn't know he could not 
give away commercial software. The other flatly told Jim he was "legally right" 
to do so. 

"Why?" asked Jim. "There's a copyright clearly visible on it." 

"Well," the person replied, "I know it's OK, because I got them off another BBS, 
so they are obviously public domain or they wouldn't be on there! I mean, why 
would it be on a BBS if you can't make copies?" 

To both the young lady and the Club BBS SysOp, the answer is the same: NO! 

All this puts me in something of a quandary. I say this because through the 
years one of the consistent themes of THE RAINBOW has been against software 
piracy. Jim believes piracy is rampant, and I know others who agree with him. 

And what is piracy? Piracy is simply giving or selling copies of software you 
yourself have not written or do not hold the rights to — unless that software is 
expressly placed in the public domain by the author who did write it. 

By the way, public domain and copyright are mutually exclusive. Material is 
either one or the other; it cannot be both. You cannot place something in the public 
domain and still retain the copyright — contrary to whatever you may have heard. 

Piracy is also accepting or buying software unless it is given or sold to you by 
the person who wrote the program, unless you have legally obtained a license to 
distribute it, or unless the program has been specifically placed in the public 
domain. 

Any piece of software that has a copyright on it cannot be copied and then given 
or sold in any way to anyone else. Period. No, not even if you typed it in! All 



12 THE RAINBOW April 1987 



commercial programs are generally copy- 
right — those you see for sale, those in this 
magazine, and most of those that appear on 
services such as Delphi and CompuServe. 
You can use the program yourself, but the 
right to make copies (the copyright) does not 
transfer to you! The key to whether these 
programs can be copied is usually whether 
or not there is a notice of copyright with 
them. That notice can be made through 
printing in a magazine, on a disk label, in 
documentation, within the program itself or 
in a variety of other ways. 

If you sell, buy, give or receive a copyright 
program, you are in violation of laws — in 
this country and internationally, as well. 
Here in the United States, there are very, 
very stiff penalties for violation of those 
laws. 

So don't violate them. Don't make copies 
of programs and give or sell them to some- 
one else. Don't buy or accept copies, either. 

There is the legal aspect, of course. But, 
in addition, there is another aspect. And it 
is just as important as the legal one: If you 
make copies of programs, you deprive those 
who hold the copyright of income — income 
that can be used to pay for the next program. 
Whether we are talking about someone who 
has written one program or THE RAINBOW, 
which publishes 20 or more programs a 
month, the situation is the same. 

If someone writes a good program and 
doesn't make any money on it, then he or 
she probably won't write another. It is as 
simple as that. Who will be deprived the use 
of that program? 

You will, of course. 

As I said, there are those who feel piracy 
is rampant in the CoCo Community. There 
is a faction who also believes that our listing 
of Clubs, BBSs and Pen Pals is not much 
more than a way for pirates to get together. 
They would like for us to end such listings 
in THE RAINBOW. 

I don't happen to think so, but I am aware 
this activity exists. It is morally wrong. It is 
illegal. But it does exist. I just hope we don't 
have to "do something about it." 

We list Clubs. BBSs and Pen Pals to bring 
the CoCo Community together. I would 
hate for us to stop. However, if such listings 
ultimately harm the CoCo Community 
more than they help, then stop we will. 

1 would appreciate being notified by you 
if you know of a Club, a BBS or a Pen Pal 
illegally trafficking in software. 1 intend to 
ban mention of that Club. BBS or Pen Pal 
from our pages. What I am suggesting is we 
all clean up our own act and not allow a few 
bad apples to spoil things for our entire 
Community. 

This is an important issue. I know 1 can 
count on the CoCo Community to do the 
right thing. 

— Lonnic Talk 




Model 101 Interface $39.95 



The Model 101 is a serial to 
parallel interlace intended lor use 
with a COCO and any Centronics 
compatible parallel inpul printer. 
The 101 has 6 switch selectable 
baud rales (300-9600). The 101 
is only 4* x-2" X 1" and comes 



with all cables and connectors lor 
your computer and printer. 



The Model 104 Deluxe Interface $51.95 



The Model 104 is a serial lo 
parallel interlace like Ihe Model 
101 bul it has Ihe added tealure 
ol a serial porl (sometimes 
referred lo as a modem switch) 
This tealure allows the conneclion 
ol a parallel printer and any 
serial device (modem, serial prinler 



etc.) lo your compuler. You may 
Ihen selecl either output, serial or 
parallel, wilh Ihe flip of a switch. 
The 104 is only 4.5 - x2 5' x 1.25* 
and comes wilh all cables and 
connectors for your compuler. You 
supply Ihe serial cable for your 
modem or olher serial device. 



Model 102 Switcher $35.95 



The Model 102 has 3 switch 
positions that allow you to 
switch your computer's serial 
output between 3 different 
devices (modem, printers or 
another computer). The 102 has 
color coded lights thai indicate 
the switch position. These 



lights also act as power 
indicators to let you know your 
computer is on. Supplied with 
the 102 are color coded labels 
that can be applied to your 
accessories. The 102 has a heavy 
guage anodized aluminum cabinet 
with non-slip rubber feet. 




Cassette Label Package $15.95 



Organize Your Tapes, Label Your 
Data Tapes, Color Code Your 
Tapes, Label Your Audio Tapes 




Save $8.40 when you purchase Ihe 
Cassette Label program and label 
package. You get ihe Casselle 
Label program, 100 WHITE labels. 
100 RED labels, 100 BLUE labels, 
100 YELLOW labels, and 100 TAN 
labels. A value worlh S24.35. but 



you pay only S15.95. When 
ordering, specify the Cassette Label 
PACKAGE 



Cassette Label Program $6.95 



New Version 1.2-Tape transfera- 
ble lo disk. Now save and 
load Labels from tape or disk. 



This fancy printing utility prints 
5 lines of information on 
pinfeed cassette labels. "Cas- 
sette Label" is menu driven and 
is very easy to use. II uses the 
special features of your 
printer for standard, expanded 
or condensed characters. Each 
line of text is automatically 
centered. Before the label 
is printed, it is shown on your 



THE 101, AND 104 
REQUIRE POWER IN ORDER TO 
OPERATE MOST PRINTERS 
CAN SUPPLY POWER TO YOUR 
INTERFACE STAR, RADIO 
SHACK, AND OKIDATA ARE JUST 
A FEW THAT DO. EPSON DOES 
NOT THE INTERFACES CAN 
ALSO BE POWERED BY AN AC 
ADAPTER (RADIO SHACK MODEL 
273-1431 PLUGS INTO ALL 
MODELS) IF YOU REOUIRE A 
POWER SUPPLY, ADD A "P" TO 
THE MODEL NUMBER AND $5 00 
TO THE PRICE. (MODEL 101 P 
$44.95. MODEL 104P $56 95) 



CRT — enabling you to 
make changes if you like — 
then print 1, 2 or 100 labels. The 
program comes on tape and it 
is supplied with 24 labels to 
get you started. 16K ECB 
required. 
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Other Quality Items 

High Quality 5 Screw Shell O10 
Cassette Tapes $7.50 per dozen 

Hara Plastic Slorage Boxes for 
Cassette Tapes $2.50 per dozen 

Pin Feed Cassette Labels 
While $3.00 per 100 
Colors $3.60 per 100 (Red. Blue, 
Yellow or Tan) 



The Model 101, 102 and 104 
will work wilh any COCO, any 
level basic and any memory size 
These producls are covered by 
a 1 year warranly. 

The Model 101 and 104 work 
wilh any standard parallel inpul 
prinler including Gemini, Epson, 
Radio Shack. OkirJala, C loth and 
many others They support 
BASIC prinl commands, word 
processors and graphic com- 
mands. 

We manufacture these products. 
Dealer inquiries are invited. 



To order call our 24 hour order 
line 513-677-0796 and use 
your VISA MASTERCARD 
request COD. or send check or 
money order to: 

Metric Industries 
P.O. Box 42396 
Cincinnati, OH 45242 

Free shipping on orders over 
$50.00. Ohio residents add 5.5% 
sales tax. 

Orders under $50.00 please add 
$2.50 for shipping. 
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How To Read Rainbow 



Please note that all the basic program 
listings in the rainbow are formatted for 
a 32-character screen — so they show 
up just as they do on your CoCo screen. 
One easy way to check on the accuracy 
of your typing is to compare what char- 
acter "goes under" what. If the charac- 
ters match — and your line endings 
come out the same — you have a pretty 
good way of knowing that your typing is 
accurate. 

We also have "key boxes" to show you 
the minimum system a program needs. 
But, do read the text before you start 
typing. 

Finally, the little disk and/or cassette 
symbols on the table of contents and at 
the beginning of articles indicate that 
the program is available through our 

RAINBOW ON DISK Or RAINBOW ON TAPE 

service. An order form for these services 
is on the insert card bound in the mag- 
azine. 



What's A CoCo? 



CoCo is an affectionate name that was 
first given to the Tandy Color Computer 
by its many fans, users and owners. 

However, when we use the term 
CoCo, we refer to both the Tandy Color 
Computer and the TDP System-100 
Computer. (While many TDP-100s are 
still in service, the TDP Electronics 
division of Tandy no longer markets the 
CoCo look-alike.) It is easier than using 
both of the "given" names throughout 

THE RAINBOW. 

In most cases, when a specific com- 
puter is mentioned, the application is for 
that specific computer. However, since 
the TDP System-100 and Tandy Color 
are, for all purposes, the same computer 
in a different case, these terms are 
almost always interchangeable. 



Rainbow Check Plus 




The small box accompanying a pro- 
gram listing in the rainbow is a "check 
sum" system, which is designed to help 
you type in programs accurately. 

Rainbow Check PLUS counts the 
number and values of characters you 
type in. You can then compare the 
number you get to those printed in the 
rainbow. On longer programs, some 
benchmark lines are given. When you 



reach the end of one of those lines with 
your typing, simply check to see if the 
numbers match. 

To use Rainbow Check PLUS, type in 
the program and save it for later use, 
then type in the command RUN and press 
enter. Once the program has run, type 
NEW and press enter to remove it from 
the area where the program you're typ- 
ing in will go. 

Now, while keying in a listing from the 
rainbow, whenever you press the down 
arrow key, your CoCo gives the check 
sum based on the length and content of 
the program in memory. This is to check 
against the numbers printed in the 
rainbow. If your number is different, 
check the listing carefully to be sure you 
typed in the correct basic program code. 
For more details on this helpful utility, 
refer to H. Allen Curtis' article on Page 
21 of the February 1984 rainbow. 

Since Rainbow Check PLUS counts 
spaces and punctuation, be sure to type 
in the listing exactly the way it's given in 
the magazine. 

10 CL5:X=25G*PEEI<(35)+178 

20 CLEAR 25, X-l 

30 X=25G*PEEI< (35) +178 

40 FDR Z=X TO X+77 

50 RERD Y:W=UI+Y:PRINT 2,V;W 

G0 POKE Z,Y:NEXT 

70 IFW=7985THEN80ELSEPRINT 

••DRTR ERROR": STOP 
80 EXEC X:END 

90 DRTR 1B2, 1, 10G, 1G7, 140, G0, 134 
100 DRTR 12G, 1B3, 1, 106, 190, 1, 107 
110 DRTR 175. 140, 50, 4B. 140, 4, 191 
120 DRTR 1, 107, 57, 129, 10, 3B, 38 
130 DRTR 52, 22, 79, 158, 25, 230, 129 
140 DRTR 39, 12. 171, 128, 171. 128 
150 DRTR 230. 132, 38, 250, 48. 1. 32 
1G0 DRTR 240. 183, 2, 222, 48, 140, 14 
170 DRTR 159, 1GG, 1GG. 132, 28, 254 
180 DRTR 1B9, 173, 198, 53, 22, 12G, 
190 DRTR 0, 135, 255, 134, 40, S5 
200 DRTR 51, 52, 41, 



Using Machine Language 



Machine language programs are one 
of the features of the rainbow. There are 
a number of ways to "get" these pro- 
grams into memory so you can operate 
them. 

The easiest way is by using an editor/ 
assembler, a program you can purchase 
from a number of sources. 

An editor/assembler allows you to 
enter mnemonics into the CoCo and 
then have the editor/assembler assem- 
ble them into specific instructions that 
are understood by the 6809 chip, which 
controls your computer. 



When using an editor/assembler, all 
you have to do, essentially, is copy the 
relevant instructions from the rainbow's 
listing into CoCo. 

Another method of getting an assem- 
bly language listing into CoCo is called 
"hand assembly." As the name implies, 
you do the assembly by hand. This can 
sometimes cause problems when you 
have to set up an ORIGIN or EQUATE 
statement. In short, you have to know 
something about assembly to hand- 
assemble some programs. 

Use the following program if you wish 
to hand-assemble machine language 
listings: 

10 CLERR200,iH3F00: I=4H3F80 

20 PRINT "ADDRESS: ";HEXS(I); 

30 INPUT "BYTE~,-BS 

40 POKE I,VRL("&H"+BS) 

50 I = I+1:GOTO20 

This program assumes you have a 16K 
CoCo. If you have 32K, change the 
&H3F00 in Line 10 to &H7F00 and change 
the value of I to &H7F80. 



The Rainbow Seal 



RAINBOW 

CERTIFICATION 
SEAL 

The Rainbow Certification Seal is our 
way of helping you, the consumer. The 
purpose of the Seal is to certify to you 
that any product that carries the Seal 
has actually been seen by us, that it 
does, indeed, exist and that we have a 
sample copy here at the rainbow. 

Manufacturers of products — hard- 
ware, software and firmware — are 
encouraged by us to submit their prod- 
ucts to the rainbow for certification. We 
ascertain that their products are, in 
actuality, what they purport to be and, 
upon such determination, award a Seal. 

The Seal, however, is not a "guarantee 
of satisfaction." The certification pro- 
cess is different from the review process. 
You are encouraged to read our reviews 
to determine whether the product is 
right for your needs. 

There is absolutely no relationship 
between advertising in the rainbow and 
the certification process. Certification is 
open and available to any product per- 
taining to CoCo. A Seal will be awarded 
to any commercial product, regardless 
of whether the firm advertises or not. 

We will appreciate knowing of in- 
stances of violation of Seal use. 
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PLUS-100 



THE PREMIER COCO 3 51 2K MEMORY UPGRADE 




1 00% 



1 00% 



1 00% 



100% 



at ■ ns-9 on 
running V* y 

a COCO 3 



Prime Factory Fresh 120 ns Chips 

No seconds or surplus chips 



$11Q00 

plus s 2 5 » S/H 
CA Residents add Sales Tax 
C.O.D. add s 2°° 



Gold Plated Connectors 

Eliminates Corrosion and Intermittent Performance with Age 

Tested 

All boards are assembled and flow soldered in an ultra high quality 
U.S. manufacturing facility producing thousands of computer boards 
per week. Each and every board is 100% visually inspected by Quality 
Control and then 100% tested in a COCO 3 Computer. 

Use of Zig zag Package Chips 

Smallest overall board size 

Shortest data paths 

Superior decoupling due to shortest distance between decoupling 
capacitors and power pins 

Cooler operation due to package orientation 

Easy to install — Solderless plug in card. 



* Price includes a $30.00 credit certificate toward the purchase of a DISKM ASTER Disk Drive System for 
the COCO 3. This System features 1 MB High Density, High Speed ( IBM-AT) Type Floppy Drives, A 
Hardware Disk Cache, A 20 MB Hard Disk, A Hardware Real-Time Clock with Battery Backup, A Parallel 
Port, 3 Serial Ports, up to 1.5 MB of Ram Disk and Highly Sophisticated Software in a Single Package with a 
Single Interconnection Cable. See this System, WHICH WILL SET THE STANDARD for COCO 3 Disk 
Drives, at the Chicago Rainbowfest in April 1987. 



HEMPHILL ELECTRONICS, INC. 



1922 Cogswell Road, 

South El Monte, CA 91733 

(818) 575-4530 



MAC INKER 

MAC INKER' ', Automatic 
Ribbon Re-inker. Re-ink any fabric 
cartridge or spool for less than 5 
cents. Over 70,000 in the field and 
we support 
ALL printers. 
Universal 
Cartridge or 
Universal Spool 
MAC INKER 

$68.50. We have cartridges 

re-inkable in 10 colors. Ask for your 
printer type or for complete listing. 
Bottle ink $3.00/each. shipping $3.oo. 




PROTEUS'", the 'Siamese' Buffer. 

It is a Data Switch with buffer on 

both ports. Switch manually or via 

software. Saves time, space and 

money. Or ask 

about our MAC 

MASTER line | 

of Universal 

Buffers and 

Printer Controllers (serial or parallel 

up to 1 MEG). 

PROTEUS 64 K-199.00 

256 K-299.00 Shipping $4.00. 
Of course we have Data Switches, 
serial/parallel, 2 way, 4 way, crossed 
etc., at most competitive prices (all 
lines switched). 




CABLES priced $10-25. We carry 
cables for all common computers 
and peripherals. Rapid turn-around 
on custom orders. 



MERCURY MODEM. Really 100% 
Hayes ' Compatible. 300/1200 baud, 
speaker, full status light display 
and 2 years warranty. Includes 

QUICK LINK, 
easiest and 
most reliable 
Comms Soft- 
ware (available 
for IBM PC or 
Macintosh) $149.00 Shipping $4.00. 

'Hayes is a trademark of Hayes Microproducts. 




MAC THE RIPPER. Our newest, original 
and welcome printer companion. Pulls off 
paper perforations and tears the sheets 
apart. Takes little space and will pay for 
itself almost immediately in saved time and 
tedium. Ask for brochure. Introductory 
Price S299.00. Shipping $10.00. 



Order Toll Free. 

Call or write for free brochure. 

1-800-547-3303 

In Oregon 503-626-2291 (24 hour line) 
We are and always will be your 

Computer 



Friends 



® 



14250 N.W. Science Park Drive 

Portland, Oregon 97229 Telex 4949559 

Dealer inquiries welcome. 



Heralding the arrival of spring . . . 

. . . and happy Jo Anna-versary 
— reflections on a year of Rainbow experience. 

Jim Reed has asked me to fill in for him while he's busy preparing for the 
Chicago RAINBOWfest. It's particularly appropriate that he picked this 
issue, our Home Help issue, because I am celebrating my one-year 
anniversary with Falsoft and THE RAINBOW. This gives me a chance to stand 
back and realize how much I've learned and come to depend on my CoCo during 
my time here, first as copy editor and now as associate editor. 

One year ago, my knowledge of computers was limited to a programming 
course in college. But I have learned fast; I had to, just to be able to read the 
magazine! Even though I am in the thick of things here at "computer central," 
I am still amazed by my discoveries about our wonderful little machine. 

For the first month or two, I stuck to games and simple programs I could 
type in and play with. Then I discovered word processing. I had always been 
a staunch champion of the typewriter, but lately I notice my old Smith-Corona 
has accumulated a pretty thick layer of dust. So much for that! Next came 
spreadsheets, graphics and some simple animation. I couldn't wait to share my 
discoveries with my family, so I had to have a CoCo at home, too. And it was 
the 1986 Home Help issue 1 used to show them how a computer is more than 
just a game machine. I like to think that with this year's issue, THE RAINBOW 
is going to help someone else discover the CoCo's charm and versatility. 

For that purpose, we have included programs to help around the house in 
many ways. Maintain a freezer food-rotation schedule, control inventory and 
print price tags for that spring yard sale, and find out how to convert your 
CoCo into an easy-to-use calculator. For the little ones, be sure to check our 
offerings from John Collicot, Laura and Chris Petit, Thomas Hood, Fred 
Scerbo and Steve Blyn. Don't neglect your own education, either. We have 
tutorials, utilities, question-and-answer columns, and an enlightening article on 
copyright law. No matter whether you're an old-timer or the new kid on the 
block, I'm sure you'll enjoy our games and the program shorties in "Novices 
Niche." 1 could go on and on, but I'd use the whole magazine telling you what's 
in it! Suffice it to say, I think there's something here for everyone. 

This past year at Falsoft has been a fun one. I've had the opportunity to 
discover interesting ideas and authors, and to learn not only about computers, 
but also about a great group of people — the CoCo Community. There is 
enthusiasm and excitement in the Community. It's full of sharing and a zest 
for learning that is impressive. We receive hundreds of letters each week from 
readers of all ages and backgrounds, from the wide-eyed 1 1 -year-old wanting 
games for his new birthday present, to the electrical engineer with OS-9 
questions, to the 83-year-old grandmother with comments about her new hobby. 
IVe witnessed the introduction of the Color Computer 3, and I'm glad to be 
a part of the team that's making the growing pains a little easier to bear. 

If it sometimes seems we're moving ahead too fast, take heart; I'm a beginner, 
too. I keep my eagle eye on the lookout for programs of interest to beginners 
they're my special province. Thank you for making my first year in the CoCo 
Community so pleasant and educational. I enjoy your articles, programs and 
letters, and I look forward to hearing about the latest innovations and 
advancements right along with the rest of the Community. 

Don't miss out on the newest techniques and advances for the Color 
Computer. Ensure your place in the CoCo world with a subscription to THE 
RAINBOW, the place where great CoCo minds come together. And now we've 
made it even easier with a new order envelope. It will handle better in the mail 
than our old postcard, and it will keep your credit card number safe from prying 
eyes. Here's some real help for you, your home and your CoCo — a RAINBOW 
subscription. Try it today! 

— Jo Anna Arnott 
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HOW DO YOU GIVE A RAINBOW? 



Name 



Address 
City 



From: 

Name 



Address 
City 



It's simple — Give a rainbow gift certificate 

Let a gift subscription to the 
rainbow carry the premier Color 
Computer magazine right to 
your friends' doorsteps, the 
rainbow is the information 
source for the Tandy Color Com- 
puter. 

Each month, your friends will 
enjoy the intelligent programs, 
reviews and articles written ex- 
clusively for their CoCo. 

First, your gift will be an- 
nounced in a handsome card. 
Then, all year 'round, they'll re- 
member you and your thought- 
fulness when they get each edi- 
tion of the rainbow — more than 
200 pages loaded with as many 
as 24 programs, 15 regular col- 
umns and lots of helpful hints 
and tips. 

Generosity benefits the giver, 
too. There'll be no more tracking 
down borrowed copies of the 
rainbow. Your collection will be 
safe at home. 

Give a rainbow gift certificate 
and letyourfriends in on the fun. 
the rainbow is the perfect com- 
panion for the Color Computer! 

Get your order to us by April 
25 and we'll begin your friends' 
subscriptions with the June 

iSSUe Of RAINBOW. 



Please begin a one-year (12 issues) gift subscription to 

THE RAINBOW for: 



.State 



ZIP 



_State 



ZIP 



□ My payment is enclosed. 

Bill to: □ VISA □ MasterCard □ American Express 

Acct. # Exp. date 

Signature 



Mail to: 

Rainbow Gift Certificate, The Falsoft Building, P.O. Box 385, Prospect, 

KY 40059 

For credit card orders call (800) 847-0309, 8 a.m. to 5 p.m. EST. 
All other inquiries call (502) 228-4492. 



Subscriptions lo the rainbow are $31 in the United States; U.S. $38 in Canada. The surface rate 
to other countries is U.S. $68; the air rate, U.S. $103. Kentucky residents add 5% sales tax. U.S. 
currency only, please. All subscriptions begin with the current issue. Please allow 6 to 8 weeks for 
delivery. In order to hold down non-editorial costs, we do not bill. 



team 



Tf?m 




Sugar House 



John Murvine, Ebensburg, Pennsylvania 



John illuminates the gallery again this month with the scene of a rustic old sugar 
house in New England. This graphic was created with basic on the CoCo 3. 



Honorable Mention 




USA 



Mario Slueve 

Minnesota City. Minnesota 




We pay tribute to the U.S. with Mario's unique 
illustration, which was created with BASIC. 



Honorable Mention 




World 



Chris Foster 

Texarkana, Texas 



On a more "global" note, we present this 3-D view of the 
world. Chris created this using BASIC and the CoCo 3. 
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Downtown Columbus 



William Savage 
Columbus, Ohio 



Graphicom and Graphicom II were used 
to create this remarkable depiction of 
downtown Columbus. William is retired 
from the telephone company and has had 
his CoCo for about four years. 



Still a newcomer to the CoCo, Wally used 

basic and the CoCo 3 to create this majestic 

representation of our national symbol. 




SHOWCASE YOUR BEST! You are invited to nominate original work tor inclusion in upcoming showings of "CoCo Gallery." Share your creations with the 
CoCo Community! Be sure to send a cover letter with your name, address and phone number, detailing how you created your picture (what programs you 
used, etc.) and how to display it. Also, please include a tew tacts about yourself. 

Don't send us anything owned by someone else; this means no game screens, digitized images from TV programs or material that's already been submitted 
elsewhere. A digitized copy of a picture that appears in a book or magazine is nof an original work. 

We will award a first prize of $25, a second prize of $15 and a third prize of $10. Honorable mentions may also be given. 

Please send your entry on either tape or disk to the CoCo Gallery, THE RAINBOW, P.O. Box 385, Prospect, KY 40059. Remember that this is a contest; therefore, 
your entry will not be returned. 

Angela Kapfhammer, Curator 
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By Robert E. Laun 



I am able to visualize two- or three- 
dimensional objects. However, when 
it comes to trying to visualize four or 
five dimensions my brain refuses to 
cooperate. When 1 was first learning 
about my CoCo 1 had a hard time 
understanding a single-dimension 
array, let alone one with two or more 
dimensions. Yet it is an important 
concept for storage and use of data in 
a computer's memory. 

1 sometimes suspect there are quite a 
few computer programmers (including 
a few professional ones) who don't 
understand arrays. For example, in my 
daily job I have occasion to use 
computer-controlled, electronic test 
equipment. The programs for these 
computers are written in BASIC. Many 
of these programs are long and sloppy. 
Had they used an array for holding and 
manipulating data, the programs would 
have more test capacity and would run 
faster. 

1 have written a short demonstration 



Robert Laun is a retired Air Farce 
Electronics technician. He has been 
using a Color Computer since 1981. He 
enjoys writing utility and instructional 
programs. 



program that uses the computer to keep 
track of a five-dimensional array. The 
statement DIN Z( 1,1) would in fact be 
a two-dimensional array that could 
hold four different numbers. Z(0,0) 
could hold a number. So could Z ( , 1 ) , 
Z(1,0) and Z(l,l) each hold a 
number for later use. 

Look at Line 10 of the program: 10 
DIM Z(2,2,2,2,2). For the moment, 
ignore the size of the array and note 
only that I used the number 2. The 
depth of each element in the array is 
actually three. That is 0, 1 and 2. For 
purposes of illustration, however, I will 
not use the element in the program. 
This makes it a little easier to follow the 
How of the program and sec what is 
taking place. 

Look at Line 10 again. Note thai it 
has five elements — sort of like length 
by width by height by ? by ?. You can 
fill in the question marks with the 
appropriate words. 

Examine lines 20 through 1 15. These 
lines allow you to specify a particular 
element in the array. Since I allow for 
two possibilities in each element in the 
array, it gives 32 possible places to store 
a data element (2 to the 5th power 
equals 32). 

Line 35, 35 IF fl<l OR fl>2 THEN 30. 



is an error-trapping routine that ensures 
the user cannot crash the program by 
specifying a place outside of the array. 
1 could have specified less than 0: 35 IF 
R<0 OR R>2 THEN 30. Since the depth 
of the first element allows for 0, 1 or 2 
this would be permissible, but as 1 said 
earlier, 1 am only using 1 and 2 to make 
the program easier to follow. 

Line 1 17 checks the specified element 
to see if there is any data there; if it is 
empty, program flow is routed to Line 
120 where you finally get to tell the 
computer what number you want to 
store. In Line 125, I limited the size of 
the number so it would be easier to 
display later in the program. 

Line 140 puts the data in the proper 
element within the array. Lines 200 
through 300 display each element of the 
array and what number is stored there. 
After the display is done, the program 
jumps back to Line 20 for more data. 

1 doubt that many people will ever 
need to use a five-dimensional array, 
especially since it does use a lot of 
memory, but the power is there if you 
need it. 

(Questions may be directed to Mr. 
Laun at 2225 North 67th Circle, Phoe- 
nix. A Z 85035. Please enclose anSASE 
for a reply.) O 
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The Amazing A-BUS\& 




An A-BUS system with two Motherboards 
A-BUS adapter In foreground 

The A-BUS system works with the original CoCo, 

theCoCo2 and the CoCo 3. 

About the A-BUS system: 

• All the A-BUS cards are very easy to use with any language that can 
reader write to a Port or Memory In BASIC, use INP and OUT (or PEEK and 
POKE with Apples and Tandy Color Computers) 

• They are all compatible with each other. You can mix and match up to 25 
cards to lit your application Card addresses are easily set with jumpers 

• A-BUS cards are shipped with power supplies (except PD-123) and 
detailed manuals (including schematics and programming examples). 

Relay Card RE-140:$129 

Includes eight industrial relays. (3 amp contacts. SPST) individually 
controlled and latched. 8 LED's show status. Easy to use (OUT or POKE in 
BASIC). Card address is jumper selectable. 

Reed Relay Card re-156: $99 

Same features as above, but uses 8 Reed Relays to switch low level signals 
(20mA max). Use as a channel selector solid state relay driver, etc. 

Analog Input Card AD-142:$129 

Eight analog inputs. lo +5V range can be expanded to 1 00V by adding a 
resistor. 8 bit resolution (20mV) Conversion time 120us. Perlect lo 
measure voltage, temperature, light levels, pressure, etc Very easy to use 

12 Bit A/D Converter an-146-. $139 

This analog to digital converter is accurate to 025% Input range is — 4V to 
+4V Resolution: 1 millivolt The on board amplifier boosts signals up to 50 
times to read microvolts. Conversion time is 1 30ms Ideal lor thermocouple 
strain gauge, etc. 1 channel. (Expand to 8 channels using the RE-t 56 card) 

Digital Input Card IN-141.$59 

The eight inputs are optically isolated, so it's sale and easy to connect any 
"on/ofl" devices, such as switches, thermostats, alarm loops, elc. to your 
computer To read the eight inputs, simply use BASIC INP (or PEEK). 

24 Line TTL I/O dg-i48:S65 

Connect 24 input or output signals (switches or any TTL device) lo your 
computer, The card can be set tor input, latched output, strobed output, 
strobed input, and/or bidireclional strobed I/O. Uses the 8255A chip. 

Clock with Alarm cl-i44:$89 

Powerful clock/calendar with: battery backup lor Time. Date and Alarm 
setting (time and date); built in alarm relay, led and buzzer; liming lo I /1 00 
second. Easy to use decimal lormat. Lithium baltery Included 

Touch Tone® Decoder ph-145:$79 

Each tone is converted into a number which is stored on the board. Simply 
read the number with INP or POKE. Use lor remote control projects, etc 

A-BUS Prototyping Card pr-152:$is 

3'k by AW in. with power and ground bus. Fits up to 10 l.£s 




ST-143 



Plug into the future 

With the A-BUS you can plug your PC (IBM, Apple, 
TRS-80) into a future of exciting new applications in the fields 
of control, monitoring, automation, sensing, robotics, etc. 

Alpha's modular A-BUS offers a proven method to build your 
"custom" system today. Tomorrow, when you are ready to take 
another step, you will be able to add more functions. This is ideal for 
first time experimenting and teaching. 

A-BUS control can be entirely done in simple BASIC or Pascal, 
and no knowledge of electronics is required! 

An A-BUS system consists of the A-BUS adapter plugged into 
your computer and a cable to connect the Adapter to 1 or 2 A-BUS 
cards. The same cable will also fit an A-BUS Motherboard for 
expansion up to 25 cards in any combination. 

The A-BUS is backed by Alpha's continuing support (our 11th 
year, 50000 customers in over 60 countries). 

The complete set of A-BUS User's Manuals is available for S10. 



Smart Stepper Controller sc -149: S299 

World's finest stepper controller On board microprocessor controls 4 
motors simultaneously Incredibly, it accepts plain English commands like 
"Move arm 1 0.2 inches left", Many complex sequences can be defined as 
"macros'' and stored In the on board memory For each axis, you can control 
coordinate Irelativeor absolute), ramping, speed, step type (hall, lull. wave), 
scale factor, units, holding power, etc Many inputs: 8 limit & "wail until" 
switches, panic button, etc. On the fly reporting of position, speed, etc On 
board drivers (350mA) lor small steppers (M0-1 03). Send lor SC- 1 49 flyer 
Remote Control Keypad Option RC-1 21 : S49 

To control the 4 motors directly, and "teach" sequences of motions. 
Power Driver Board Option PD-1 23: S89 

Boost controller drive lo 5 amps per phase. For Iwo motors (eight drivers) 
Breakout Board Option BB-1 2 2: S1 9 

For easy connection ol 2 motors 3 It. cable ends with screw terminal board 

Stepper Motor Driver st-i43:S79 

Stepper motors are the ultimate in motion control. The special package 
(below) includes everything you need lo get lamiliar with them. Each card 
drives Iwo stepper motors (12V. bidirectional. 4 phase. 350m A per phase) 
Special Package: 2molnrs(MO-l03) + ST-143 PA-181:S99 

Stepper Motors mo-i 03: si 5 or4for$39 

Pancake type. 2%" dia. 'A" shall. 757step. 4 phase bidirectional. 300 
step/sec. 1 2V, 36 ohm. bipolar, 5 oz-in torque, same as Airpax K82701 -P2 

Current Developments 

Intelligent Voice Synthesizer, 1 4 Bit Analog to Digital converter. 4 Channel 
Digital to Analog converter. Counter Timer. Voice Recognition. 

A-BUS Adapters for: 

IBM PC XT, AT and compatibles. Uses one shoit sioi AR-1 33 S69 

Tandy 1 000, 1 000 EX& SX, 1 200, 3000. Usesonesnon slor AR-1 33.. $69 

Apple II, II+. lie. Uses any slot AR-134 S49 

TRS-80 Model 102. 200 Plugs mio 40 pin "svsrem bus" AR-136 S69 

Model 1 00. Uses 40 pin sockei (Sockel is duplicated onadaoter) AR- 1 35. $69 

TRS-80 Mod3.4.4D Fits 50 Din bus (Witnharddlsk.useY-cable) AR-132 ..$49 

TRS-80 Model 4 P. Includes extra cable. (50 pin bus is recessed) AR-1 37 . $62 

TRS-80 Model I, Plugs into 40 pin I/O Bus on KB or E/l. AR-1 31 . S39 

Color Computers (Tandy).Firs ROM sioi Muiimak. or v-came AR-1 38 .549 

A-BUS Cable (3 ft, so cond.) ca-163: $24 

Connects the A-BUS adapter to one A-BUS card or to first Motherboard 
Special cable for two A-BUS cards: CA-1 62: S34 

A-BUS Motherboard mb-i20:$99 

Each Motherboard holds live A-BUS cards A sixth connector allows a 
second Motherboard to be added to the lirst (with connecting cable CA- 
161: $12). Up to five Motherboards can be joined this way to a single A- 
BUS adapter. Sturdy aluminum frame and card guides included. 
• The A-BUS is not a replacement for the Multi-pak 




RE-140 




IN-141 




AD-142 



Add S3. 00 par order /or shipping. 
Visa. MC. checks, M.O. welcome. 
NY residents add sates tax. 
C.O.D. add S3. 00 extra. 
Canada: shipping Is S5 
Overseas add 10% 
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ALPHA ^fwto 

a division ol Sigma Industries. Inc 

242 W. Avenue, Darien, CT 06820 



Technical info (203) 656-1 806 

£M V 800 221-0916 

New York orders: (718) 296-5916 
All lines open weekdays 9 to 5 Eastern time 





You'll use it all the time and love using it. 



What isCoCoMax? 

Simply the most incredible graphic 
and text creation "system" you have 
ever seen. A Hi-Res Input Pack (more 
on the pack later) is combined with 
high speed machine language 
software. The result will dazzle you. 




CoCo Max disk systam, with t-cabla. 



Is CoCo Max for you ? 

Anyone who has ever held a pencil or 
a crayon for fun, school or business 
will love it. A 4 year-old will have fun 
doodling, a 1 5 year-old will do class 
projects and adults will play with it for 
hours before starting useful 
applications (illustrations, cards, 
artwork, business graphics, flyers, 
charts, memos, etc.) This is one of the 
rare packages that will be enjoyed by 
the whole family. 

What made CoCo Max an 
instant success? 

First there's nothing to learn, no 
syntax to worry about. Even a child 
who can't read will enjoy CoCo Max. 
Its power can be unleashed by simply 
pointing and clicking with your 
mouse or joystick. With icons and 
pull down menus, you control CoCo 
Max intuitively; it works the same way 
you think. 

Don't be misled by this apparent 
simplicity. CoCo Max has more power 
than you thought possible. Its blinding 
speed will astound you. 
It lets you work on an area 3.5 times 
the size of the window on the screen. 
It's so friendly that you will easily 
recover from mistakes: The undo 
feature lets you revert to your image 
prior to the mistake. As usual, it only 
takes a single click. 
Later, we will tell you about the 
"typesetting" capabilities of CoCo 
Max II, but first let's glance at a few of 
its graphic creation tools: 



With the pencil you can draw free 
hand lines, then use the eraser to 
make corrections or changes. For 
straight lines, the convenient rubber- 
banding lets you preview your lines 
before they are fixed on your picture. 
It's fun and accurate. Lines can be of 
any width and made of any color or 
texture. 

The paint brush, with its 32 
selectable brush shapes, will adapt to 
any job, and make complicated 
graphics or calligraphy simple. 
For special effects, the spray can is 
really fun: 86 standard colors and 
textures, all available at a click. It's 
like the real thing except the paint 
doesn't drip. 

CoCo Max will instantly create many 
shapes: circles, squares, rectangles 
(with or without rounded corners), 
ellipses, etc. Shapes can be filled with 
any pattern. You can also add 
hundreds of custom patterns to the 
86 which ara included. 
The Glyphics are 58 small drawings 
(symbols, faces, etc.) that can be used 
as rubber stamps. They're really great 
for enhancing your work without effort. 




Pull down manus 



Zoom In I 



Control Over Your Work 

CoCo Max's advanced "tools" let you 
take any part of the screen, (text or 
picture) and perform many feats: 
• You can move it around • Copy 
it • Shrink or enlarge it in both 
directions • Save it on the electronic 
Clipbook • Flip it vertically or 
horizontally • Rotate it • Invert 
it • Clear it, etc. etc. 
All this is done instantly, and you can 
always undo it if you don't like the 
results. 

For detail work, the fat bits (zoom) 
feature is great, giving you easy 
control over each pixel. 
To top it all, CoCo Max II works in 
color. Imagine the pictures in this ad 
in color. If you own a Radio Shack 
CGP-220 or CGP-1 1 5, you can even 
print your work in full color ! 




There is so much more to say, such as 
the capability to use CoCo Max 
images with your BASIC programs, 
the possibility to use CoCo Max's 
magic on any standard binary image 
file. There are also many advanced 
features such as the incredible lasso. 




Insldm tha Hi-Ras Input Pack 



Why a Hi-Res Input Pack ? 

Did you know that the CoCo joystick 
input port can only access 4096 
positions (64x64)? That's less than 
1 0% of the Hi-Res screen, which has 
49152 points! (256x192). You lose 
90% of the potential. The Hi-Res Input 
Pack distinguishes each of the 491 52 
distinct joystick or mouse positions. 
That's the key to CoCo Max's power. 
The pack plugs into the rom slot (like 
a rom cartridge). Inside the pack is a 
high speed multichannel analog to 
digital converter. Your existing 
joystick or mouse simply plugs into 
the back of the Hi-Res Pack. 

Electronic Typesetting... 

You'll be impressed with CoCo Max's 
capability. Text can be added and 
moved around anywhere on the 
picture. (You can also rotate, invert 
and flip it...) At a click, you can choose 
from 1 4 built in fonts each with 1 6 
variations. That's over 200 typestyles I 




Examptas of printouts 



Printing Your Creations 

There are a dozen ways to print your 
work. All are available with a click of 
your joystick (or mouse) without 
exiting CoCo Max. Your CoCo Max 
disk includes drivers for over 30 
printers ! 



All the CoCo Max pictures are unretouched screen shots or printouts (Epson RX-80). 





The whole family will enjoy 
CoCo Max. Here are a few 
examples of the possibilities. 

All these pictures are unretouched screen photos 
or printouts (on an Epson RX-80). 
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promt 
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©Business graphs, charts, 
diagrams. Also memos 



I* — i 
Fun for children while 
stimulating creativity. 



Publish a newsletter 
or bulletin 



SJ m CoCo Nat CoCo flax 


coco h.h CoC ° *°« CoCo Max 


<•»•«- «•»•.. CoCoAtox 


swiftiin^ 


CoCo Mm 


CoCo max 
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CoCo max 
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CoCo max 
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CoCo Max 
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CoCo Max 
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__ Junior's homework 
Qj and science projects. 
Term papers too I 



©Video portrait 
(with optional digitizer). 




PS®:©: 



_ Over 200 typestyles to 
|jj choose from I 
generate flyers. 





©A new way to express 
your imagination. 



© 



schematics 
and floor plans. 



Xjj This is a cartoon. 

CcCoMcolK 



CoCo Max II 

(Tj) Logos and letterheads. 



System Requirements: 

Any 64K CoCo and a standard joystick or 

mouse. (The koala pad and the track ball work, 

but are not recommended.) 

Disk systems need a Multi-Pak or our Y-Cable. 

CoCo Max is compatible with any Radio Shack 

DOS and ADOS. 

Note: the tape version ot CoCo Max includes 

almost all the features of CoCo Max II except 

Shrink, Stretch, Rotate, and Glyphics. Also, it 

has 5 fonts instead of 1 4. 

CoCo Max is not compatible with JDOS, 

DoubleDOS, MDOS, OS-9, the X-pad, and 

Daisy Wheel Printers. 

Printers Supported: 

Epson MX, RX, FX and LX series, Gemini, Star, 
Micronix, Delta 10, 10X, 15, 15X, SG- 
10,Okidata 82A, 92, 93, C. Itoh Pro-writer, 
Apple Image-writer, Hewlett-Packard Thinkjet, 
Radio Shack DMP 1 00, 1 05, 1 1 0, 1 20, 200, 
400, 500, Line Printer 7, Line Printer 8. TRP- 
100, CGP-220. (DMP-130 use Line Printer 8), 
PMC printers, Gorilla Banana. 
Color printing: CGP-200, CGP-1 1 5 



Pricing 



CoCo Max on tape $69.95 

with Hl-Res Pack and manual. 

CoCo Max II (disk only) $79.95 

with Hl-Res Pack and manual. 

Upgrade: CoCo Max to CoCo Max II 

New disk and manual $1 9.95 

New features of CoCo Max II: 14 fonts and glyphic 
font, dynamic shrink and stretch, rotate, multiple drive 
capability, 68 page scrapbook, point and click file 
load, color printer drivers, full error reporting. 

Upgrade: CoCo Max tape to disk 

manuals, disk and binder $24.95 

Y-Cable: Special Price $19.95 

Super Picture Disks #1 , #2, and #3 

each: $14.95 
All three picture disks $29.95 

Guaranteed Satisfaction 

Use CoCo Max for a full month. 

If you are not delighted with it, 

we will refund every penny. 



Font Editor Option 

A font is a set of characters of a 
particular style, CoCo Max includes 
1 5 fonts. You can create new fonts of 
letters, or even symbols or graphics 
with the font editor. Examples: set of 
symbols for electronics, foreign 
alphabets, etc $19.95 

Video Digitizer DS-69 

This new Low Cost Digitizer is the 
next step in sophistication for your 
CoCo Max system. With the DS-69 
you will be able to digitize and bring 
into CoCo Max a frame from any video 
source: VCR, tuner, or video camera. 
Comes complete with detailed 
manual and C-SEE software on disk. 
Multi-Pak is required. 

New Low Price Save $50 $99.95 

New: faster DS-69A $1 49.95 



Colorware Incorporated 
[CO LOR WARE 79-04 A Jamaica Avenue 

Woodhaven, NY 11421 



800 221 -091 6 

Orders only. 

NY a Info: (718) 296-5916 
Hours: 9-5 Eastern time. 



Add S3. 00 per order tor shipping. 
We accept Visa, MC, chocks, M. O. 
C. O. O. add S3. 00 extra. mmWM 

NYandCT: add tales tat. I "" | 
Shipping to Canada Is SS. 00 rr=r 
Overseas. FPO, APO add /0% 








100 PRINT "5 EACH FILE HAS TWO DR 


The listing: F I FTHD IM 


AWERS . " 




110 INPUT" WHICH DRAWER? 1 OR 2 


ft CLS 


" ; E : PRINT 


10 DIM Z(2,2,2,2,2) 


115 IF E<1 OR E>2 THEN110 


20 PRINT M THERE ARE TWO DIFFERENT 


117 IF Z(A,B,C,D,E)<>0 THEN PRIN 


OFFICE BUILDINGS WHERE DATA IS 


T" THERE IS ALREADY DATA THERE": I 


STORED. ": PRINT 


NPUT" SHALL I DISCARD THAT DATA? 


30 INPUT" 1 WHERE WILL YOU STORE 


Y / N";AN$:ELSE120 


THE DATA BUILDING 1 OR BUILDIN 


118 IF AN$<>"Y" THEN 20 


G 2"; A: PRINT 


120 INPUT"OK! NOW WHAT IS THE NU 


3 5 IF A<1 OR A>2 THEN 30 


MBER THAT YOU WANT TO STORE IN T 


40 PRINT" 2 EACH BUILDING HAS TWO 


HIS SPOT (3 DIGITS MAXIMUM) " ;N 


FLOORS . " 


125 IF N<-999 OR N>999 THEN 120 


50 INPUT" WHICH FLOOR? 1 OR 2" ; 


140 Z(A,B,C,D,E)=N 


B: PRINT 


200 CLS' DISPLAY DATA 


55 IF B<1 OR B>2 THEN50 


210 F0RA=1T02:F0RB=1T02:F0RC=1T0 


60 PRINT" 3 EACH FLOOR HAS TWO OF 


2 : F0RD=1T02 : F0RE=1T02 


FICES." 


2 20 PRINT@480,""; :PRINTA; : PRINTT 


70 INPUT" WHICH OFFICE? 1 OR 2" 


AB ( 5 ) B ; : PRINTTAB ( 10 ) C ; : PRINTTAB ( 


; C : PRINT 


15) D; : PRINTTAB ( 20) E; : PRINTTAB (25 


75 IF C<1 OR C>2 THEN 10 


) "="Z(A,B,C,D,E) :GOSUB300 


80 PRINT" 4 EACH OFFICE HAS TWO F 


225 FORX=1TO100:NEXT 


ILES . " 


230 NEXT E,D,C,B,A 


90 INPUT" WHICH FILE? 1 OR 2";D 


240 CLS:GOTO20 


: PRINT 


300 PRINT@0," BL FL OF FI 


95 IF D<1 OR D>2 THEN 90 


DR": RETURN _ 

l7Z\ 



Hint 



RS-232 Baud Rates 



These poke values for the CoCo will create the 16 
most commonly used baud rates. They are as follows: 



Baud Kate 


Poke 149 


Poke 150 


50 


4 


88 


75 


2 


227 


110 


1 


246 


134.5 


1 


153 


150 


1 


110 


300 




180 


600 




87 


1200 




40 


1800 




25 


2000 




23 


2400 




18 


3600 




10 


4800 




7 


7200 




3 


9600 




1 



To achieve 19200 baud, one must use the pokes for 
9600 baud and then use the bold poke (65497,0) to 
double the CoCo's speed. (Use PO.I<EG5496,0 to 
restore normal speed.) 



Submitting Material 
To Rainbow 



Contributions to THE RAINBOW are welcome from 
everyone. We like to run a variety of programs that 
are useful/helpful/fun for other CoCo owners. 

Program submissions must be on tape or disk and 
it is best to make several saves, at least one of them 
in ASCII format. We're sorry, but we do not have time 
to key in programs. All programs should be supported 
by some editorial commentary explaining how the 
program works. Generally, we're much more inter- 
ested in how your submission works and runs than 
how you developed it. Programs should be learning 
experiences. 

We do pay for submissions, based on a number of 
criteria. Those wishing remuneration should so state 
when making submissions. 

For the benefit of those who wish more detailed 
information on making submissions, please send a 
self-addressed, stamped envelope (SASE) to: Submis- 
sions Editor, THE RAINBOW, The Falsoft Building, P.O. 
Box 385, Prospect, KY 40059. We will send you some 
more comprehensive guidelines. 

Please do not submit programs or articles currently 
submitted to another publication. 
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The Ultimate 
Color Computer 

Enhancements 
for Productivity 
from HJL Products 








VV 




Now available for all 
models, including CoCo 3 



To achieve maximum productivity with 
your Color Computer, you have to make 
it as easy as possible to get Information 
into and out of the system. 

This is why we developed the HJL 
family of high-performance 
enhancements for ALL MODELS of the 
Color Computer. X /?ow 

The Keyboard - $79*3 — *^" 

The overwhelming favorite of serious 
Color Computer users worldwide, the 
HJL-57 keyboard has the smooth, 
consistent feel and reliability you need 
for maximum speed with minimum 
Input errors. Includes 4 Function Keys 
and sample function key program. 
Installs in just a few minutes with no 
soldering. ^ /^ 

The Numeric Keypad ■ WM6~£QZf 

The NumberJack Is a self-contained/"*^^ 
cable-connected keypad for heavy-duty 
number-crunchers. Besides the number 
keys, It has all the cursors, symbols 
and math keys, Including autoshifted 
(one-touch) ADD and MULTIPLY. 
Comes complete with 3-foot cable and 
all necessary connectors for quick and 
easy installation without soldering. 



The Monitor Adapter • $25.95 

This universal driver works with all 
monochrome monitors, and is easily 
installed without clips, jumpers or 
soldering (except In some later CoCo 2s 
with soldered-ln video chips). Here's 
crisp, clear, flicker-free monitor output 
with all the reliability you've come to 
expect from HJL Products. 

The Monitor ■ $89.95 

The GoldStar high-resolution amber 
monitor brings you the monochrome 
display that's preferred by most 
computer professionals today. Once 
you've used It you'll never connect your 
computer to a TV set again. The 12- 
inch diagonal CRT has an etched non- 
glare faceplate. (Requires adapter sold 
above) £ ffa^ 

The BASIC Utility - $25* 

Quick Basic Plus, a high-performance 
programming utility, can be used with 
any color computer that has four func- 
tion keys. 26 pre-defined BASIC 
statements, 10 user-defined macros at 
a time (you can save as many sets of 
macros as you like), automatic line- 
numbering, word wrap, global search, 



&fxs- 



and instant screen dump to printer, 
make this software the BASIC pro- 
grammer's dream come true. Comes 
with re-legendable 3-way reference 
chart. Specify disk or cassette. 

The HJL Warranty 

Every HJL product comes with a full, 
one-year warranty and the exclusive 
HJL 15-day unconditional guarantee 
(except software). 

Pick a Pair & Save 15% 

Now, for a limited time, we'll give you 
15% off the price of any two or more 
products shown here. Just mention 
this ad when you order. 

Call Now, Toll Free 

1-800-828-6968 

In New York 1-800-462-4891 
International calls: 716-235-8358 




Ordering Information: Speclly modal (Original, F-version, or CoCo 2 Model Number). Paymenl by C.O.D., check, 
MasterCard, or Visa. Credit card customers include complete card number and expiration date. Add S2.00 'or 
shipping, 3.50 to Canada; except monitors (call lor shipping charges belore ordering monitors). New York state 
residents add 7% sales tax. Dealer Inquiries Invited 



PRODUCTS 

Div. of Touchstone Technology Inc. 

955 Buffalo Road • P.O. Box 24954 
Rochester, New York 14624 






A perfect companion for those who 
want to predict landfall 
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Tracking 
the 



Tempest 



H.G. Williamson, M.D. 





urrlrak has everything you 
need to track a hurricane ex- 
cept an auxiliary power 
supply. It uses a Hi-Res (PM0DE4) map 
extending from 10-40 degrees north 
latitude to 60-100 degrees west longi- 
tude. This area includes the Atlantic 
Ocean, Caribbean Sea, Gulf of Mexico 
and land masses which are colored red 
using moire color: POKE 178, PC. 

Eight graphics pages are cleared and 
PM0DE4,5 is used to draw the map, the 
boxes for data display and the sequen- 
tially connected circles indicating the 
actual track of the hurricane (see Figure 
1). When data is entered, pages 5 to 8 
are copied to pages 1 to 4 to give a clean 
map before new data is drawn. Prompts 
are drawn on the lower screen to allow 
use of subroutines to update weather 
data, review all data that has been 
entered, print a copy of the map, iden- 
tify costal cities and to quit in an 
organized shut-down process. 

The heart of Hurrtrak is an INKEYS 
loop that monitors TIMER to estimate 
elapsed time. Every hour, on the hour, 
the hurricane is repositioned on the 
screen. This is a mathematical correc- 
tion and no attempt has been made to 
incorporate meteorological data. 

Dr. H. G. Williamson is an orthopedic 
surgeon and a retired U.S. Army of- 
ficer. He is a self-taught programmer 
and combines this hobby with wood- 
working and auto restoration. 



Whenever TIMER=>3550, the minute 
counter is incremented by one until 
MN=>60, at which time the hour is 
incremented by one. If your program 
has a time error then change the value 
of TM=>3550 in Line 20. Decrease the 
value to speed up; increase value to slow 
down. 

You will notice that the hurricane 
symbol is superimposed on three radiat- 
ing dotted lines (see Figure 2). The 
longer central line indicates the pre- 
dicted course based on the DIRECTION 
input with the last weather data. The 
shorter lines on either side indicate 
alternate courses. The three-line group 
represents three consecutive directions 
on a magnetic compass rose, e.g., N- 
NNE-NE, etc. Data is drawn in labeled 
boxes along the right margin of the 
screen. The lowermost box, MPD 
(miles per day), indicates the computed 
distance that the hurricane is expected 
to travel during the next 24 hours if the 
speed and direction remain unchanged. 

Ident allows everyone, even a non- 
mathematician, to determine the dis- 
tance from the hurricane to selected 
landmarks and to estimate the hours 
before landfall. You may select any one 
of 30 coastal cities and geographical 
landmarks by typing in a two-letter key 
taken from a submenu (see Figure 4). 
The key, mileage and hours will be 
displayed on the upper screen and a line 
drawn from the landmark to the hurri- 
cane eye (see Figure 3). These will be 
erased when you update or ident 
another city. 

The Hurrtrak print routines are writ- 
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Figure 1: PMODE4,5 Screen 
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Figure 2: PMODE4,l Screen 
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Figure 3: Ident Option 



ten for the DMP-105 printer. If you 
want to print using 2400 baud (fastest 
rate) then set the switch on your printer 
and unmask Line 9. You may print a 
copy of the map displayed on the screen 
by adding a machine language screen 
dump program and editing Line 540. Be 
sure to edit Line 20 (DEFUSR0) to be 
compatible with your program and 
printer. With some programs, you will 
probably want to use the inverse screen 
poke. The first map printed is preceeded 
by a list of all of the landmarks and their 
respective latitudes and longitudes. If 
additional copies of the landmarks are 
desired, use the Quit option. Don't 
worry. You can return to the main 
program from this subroutine. 

When you are ready to quit, you are 
able to perform any of the onscreen 
options and to save input data on tape. 
DIM DS(25,5) limits you to the start- 
up data and 25 updates during your 
track. However, if you save the data and 
then load it, you will be able to track 
an infinite number of points. When you 
load, the previous track is drawn using 
PM0DE4,5 and the counter U is reset to 
zero. You can now enter 26 new up- 
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dates. You will not be able to review the 
previous data unless you made a printed 
copy while reviewing data before shut 
down (see Figure 3). 

1 have not discussed any of the inter- 
esting mathematics which one encoun- 
ters in computer map-drawing of the 
western longitudes or northern lati- 
tudes. The horizontal (X) grid on the 
video screen is numbered from left to 
right and the vertical (Y) grid is num- 
bered from top to bottom, the exact 
opposite of the map needed. Trigono- 
metric functions take a little experi- 
menting because the screen grids have 
no provisions for negative (X) and (Y) 
values. Suffice it to say that each space 
on the 256-by-192 grid represents 13 
miles and each five spaces represents 
one degree of latitude or longitude. 

Hurrtrak may be modified for Ex- 
tended Disk BASIC by changing 8-1 to 
ttl and PRINT to WRITE where they 
appear in lines 630 and 1000. 

(Questions may he directed to the 
author at 67 Plantation Road, Myrtle 
Beach, SC 29577. Please enclose an 
SASEfor a reply.) U 
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Figure 4: Coastal Cities and Geographical Landmarks 
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Figure 5: Review Option 
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R] " : PRINT§302 , " " ; : LINEINPUTDA$ 
30 SOUND150,1:CLS:PRINTTAB(5) "** 

INSTRUCTIONS **": PRINT: PRINT" 
1. LINES 20,530,540 MUST BE":PRI 
NT" EDITED FOR YOUR PRINTER" 
: PRINT" AND SCREEN DUMP PROG 



The listing: HURRTRAK 



RAM.": PRINT" 

PLAYED" 

3 5 PRINT" 

THE": PRINT" 
": PRINT" 
INT" 



WHEN MAP IS DIS 




1 
2 
3 
4 
5 
6 
7 
8 
9 



' < HURRTRAK > 
i 

1 BY 

1 H. G. WILLIAMSON 

' 67 PLANTATION ROAD 

1 MYRTLE BEACH, SC 29577 

1 COPYRIGHT OCT 198 6 

****************************** 

'POKE149,0:POKE150,18: ' 2 400BAU 



D 

10 GOTO 640 

15 CLS6:DIM D$ (25, 5) , Dl (25) , D2 (2 

5) :R=57. 29577951 

20 TM=3 550:MH=60:U=-1:DEFUSR0=31 

913: 'PRINT MAP 

25 PRINT@160," ENTER NAME OF HUR 

RICANE" : PRINT" " ; : LINEINPUTHN$ : P 

RINT: PRINT" ENTER DATE [MM/DD/Y 



TYPE THE LETTER IN 

PARENTHESES TO: 

(U)PDATE DATA": PR 

(P)RINT MAP" SPRINT" 

(R)EVIEW DATA ENTERED" : PRIN 

T" (I)DENTIFY LANDMARK" : PR 

INT" (Q)UIT": PRINT: PRINT" 

**** PRESS ANY KEY ****» 
40 GOSUB655:GOSUB210 
45 TIMER=0 
A$=INKEY$ 

CIRCLE (X,Y) ,4,0, . 8 : CIRCLE (X, Y 
),8,0,.8:IF A$<>""THEN425 
60 FORT=1TO20:NEXT 

65 CIRCLE(X,Y) ,4,1, . 8 : CIRCLE (X, Y 
),8,1,.8 

70 IFTIMER>TM THENMI=MI+1 : IFMKM 
H THEN45ELSEMI=0:GOSUB155:GOSUB1 
15:GOT045 

75 FORT=1TO200:NEXT:GOTO50 
80 • 

85 •** ADJUST MIN ** 
90 MI=MI+INT(TIMER/3550+.5) :PMOD 



50 
55 
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(H 

M 



:SCREENl,l:GOT04 5 

*** SUBROUTINES 

*** UPDATE HOUR ** 

115 H=VAL(HR$)+1:MI$="00":IFH= 

THENH=1 

12^0 H$=STR$(H) :IFH<10 THEN HR$ 

0"+RIGHT$(H$,l)ELSE HR$=RIGHT$ 

$ 2) 

125 U$(1)=HR$+MI$ 

130 X$=STR$(INT(10*(100-(X/5) ) 

10) :U$ (2)=RIGHT$ (X$, LEN (X$) -1) 

135 X$=STR$(INT(10*(40-(Y/5) ) )/l 

0) :U$(3)=RIGHT$(X$,LEN(X$)-1) :X$ 
= mii 

140 B=20 : X$=" " :UD=1 : F0RN=1T03 : D$ 

=U$(N) :GOSUB310:NEXTN:UD=0 

145 • 

15j3 i*** MOVE EYE/HR *** 

155 SOUND150,1:SOUND150,1 

160 IF X<1 OR Y<1 THEN 175 

X=X+COS (AN/R) *(S/13) :Y=Y+SIN(AN/ 

R)*(S/13) 

165 IFX>200ORX<1ORY>150ORY<1THEN 

180 

170 RETURN 

175 IFX<1THENX=1ELSEIFY<1THENY=1 

180 CIRCLE(X,Y) ,4,0: CIRCLE (X,Y) 

8,0 L 

185 ' 

190 «*** 

195 SOUND150,1:FORT=1TO 100: NEXT: 
GOT0195 

i 




ENAN=270-(N*22.5) :GOT0245 

240 NEXTN:D$(U,3)="UNK":AN=225 

245 SOUND150,1:LINEINPUT" SPEED 

MPH : " ;D$(U,4) :S=VAL(D$(U,4) 
)1:IFS=0THENS=1 
250 SOUND150,1:LINEINPUT" WINDS 

MPH : ";D$(U,5) 
2 55 SOUND150,1: PRINT" <E>RROR 

?" 

260 X$=INKEY$ : IFX$=""THEN260ELSE 
IFX$="E"THENCLS:GOTO210 
265 CLS1:X$=STR$(S*24) :MD$=RIGHT 
$(X$,LEN(X$)-1) :X$="" 
270 

275 •*** TRACK FROM 
2 80 PM0DE4,5:SCREEN1,1:IF 
EN COLOR0:FORN=0TOU-1:LINE(D1(N) 
,D2(N) )-(Dl(N+l) ,D2(N+1) ) ,PSET:C 
IRCLE(D1(N) ,D2(N) ) , 3 ,0 :NEXTN: CIR 




ELSE 



SCREENI,! 



CLE(D1(N+1) ,D2(N+1) ) ,3,0 

285 PMODE4,l:PCLSl: 

N=l TO 4: PCOPY N+4 

290 

295 

300 PMODE4,l: SCREENI 



FOR 



■*** DRAW DATA *** 



END TRAP *** 



305 
310 
315 
320 
325 




200 

205 •** INPUT DATA ** 

210 CLS:U=U+1:PRINT@3 2,"HURRIC 

E NAME: " ;HN$ : PRINT" DATE 

: ";DA$:SOUND150,l:LINEINPUT" 
TIME <2400> : " ;D$ (U,0) :HR$=LEF 
T$(D$(U,0) ,2) :MI=VAL(RIGHT$(D$(U 
,0),2)) :TI=MI:L=4 
215 L=L+l:SOUND150,l:LINEINPUT" 
W LONGITUDE : " ;D$ (U, 1) : X=VAL(D 
$(U,1)) :IFX>990RX<55THEN215ELSEX 
=5*(100-X) :D1(U)=X:XD=X 
220 L=L+1:SOUND150,1:LINEINPUT" 
N LATITUDE : " ; D$ (U, 2) : Y=VAL(D 
$(U,2) ) :IFY>39ORY<10THEN220ELSEY 
=5*(40-Y) :D2(U)=Y:YD=Y 
225 GX=0:FORN=0TO15:PRINT§(GX*32 
) +27 , C$ (N) ; : GX=GX+1 : NEXT: PRINT@2 
56,""; 

230 PRINT@32*L,""; : SOUND150 , 1 : LI 
NEINPUT" DIRECTION : ";D$(U,3 
:FORN=27TO507STEP3 2:PRINT@N," 
"; :NEXT:PRINT(§32*(L+1) ,""; 

FORN=0TO15 : IFC$ (N) =D$ (U , 3 ) TH 





FORN=0TO5 : D$=D$ (U , 

L=LEN(D$) 

IFVAL(D$) >0THEN345 

FORZ=lTOL 

Z$=MID$(D$,Z,1) 
330 F0RQ=1T026:IFMID$(W$,Q,1)=Z$ 
THENX$=X$+L$(Q) :GOTO340 
3 35 NEXTQ 

40 NEXTZ:GOT03 55 
345 FORZ=lTOL:Z$=MID$(D$,Z,l 
$="."THENW=10ELSE W=VAL(Z$) 
350 X$=X$+N$(W) :NEXTZ 
355 COLORl:LINE(214,B-7)-(248,B+ 
1) , PSET, BF: COLOR0 : DRAWS4C0BM220 
, "+STR$ ( B) +X$ : X$=" " : B=B+24 : X$=" " 
3 60 IF UD=1 THEN RETURN 
365 NEXTN:DRAW"C0BM220,164":FOR 
N=l TO LEN (MD$ ): DRAW N$(VAL(MID$ 
(MD$,N,1))) :NEXT N 
370 • 

375 •*** PREDICT COURSE *** 
3 80 D=6:DD=D 

385 FORCR=AN+2 2 . 5TOAN-2 2 . 5STEP-2 
2.5:IFAN=CR THENKJ=8ELSEKJ=5 
390 FORN=lTOKJ:PSET(XD,YD,CL) :A= 
INT(COS(CR/R)*DD)+XD:B=INT(SIN(C 
R/R)*DD)+YD 
395 IFA<0ORB<0THEN155 
400 PSET(A,B,CL) :DD=DD+D 
405 NEXT N:DD=D:NEXTCR:IFCL=0THE 
N RETURN ELSE CL=0:GOTO380 
410 





'*** SCREEN OPTIONS *** 

IFA$="R"THEN475 

IFA$="P" AND PM=1 THEN 540 E 

IF A$="P" THEN PM=1:GOTO530 

IFA$="I"GOSUB555 :GOSUB380 : GO 



415 
420 
425 
430 
LSE 
435 
TO90 

44J3 IFA$="U"THEN GOSUB210 : GOTO90 
445 IFA$<>"Q"THEN65 
450 CLS :T=0: PRINTS 7 1, "READY TO S 
HUT DOWN" :PRINT@99,"SELECT ONE O 
R MORE NUMBERS": PRINT: PRINT" 
. RETURN": PRINT" 1. PRINT WEAT 
H/BULL DATA": PRINT" 2. PRINT L 
ANDMARKS": PRINT" 3. PRINT MAP" 
: PRINT" 4. RECORD ON TAPE":PRI 
NT" 5. SHUT DOWN" 
455 A$=INKEY$:IFA$=""THEN455ELSE 
QT=VAL(A$) :IF A$="0"THEN 90 ELSE 

IF QT>5 THEN 455 
460 ON QT GOSUB 505,530,540,625, 
195: GOTO 450 
465 ' 

47j2 i*** REVIEW *** 
475 CLS:PRINT"HURRICANE "+HN$:PR 
INT" DATE: " ;DA$ : PRINT"TIME LONG 

LAT DIR VEL WIND" 
480 FOR N=0 TO U 

485 PRINTD$(N,0)TAB(6)D$(N,2) ;TA 
B(11)D$(N,2) ;TAB(17)D$(N,3) ;TAB( 
22)D$(N,4) ;TAB(27)D$(N,5) 
490 NEXT: PRINT: PRINT "PRINT COPY? 

<Y/N>" 
495 A$=INKEY$:IFA$=""THEN495ELSE 
CLS : IFA$o"Y"THEN90 
500 ! 

505 PRINT #-2, TAB (10) "HURRICANE " 
+HN$+" DATE: "+DA$ 
510 PRINT#-2,TAB(10) "TIME" ; TAB ( 2 
0)"LONG";TAB(30) "LAT" ;TAB (40) "DI 
R" ; TAB ( 50 ) "VEL" ; TAB ( 60 ) "WINDS " 
515 FORN=0TOU:FORM=0TO5:PRINT#-2 : 
,TAB(M*10+10)D$(N,M) ; :NEXTM:PRIN 
T#-2:NEXTN:PRINT#-2,TAB(10) "** E 
ND **":PRINT#-2:IF QT>0 THEN RET 
URN ELSE GOTO90 
520 ' 

525 ■*** PRINT MAP *** 
530 PRINT#-2,CHR$(27)CHR$(14)TAB 

(15)" LANDMARKS " ; CHR$ (27) CHR$ (15) 
: PRINT#-2 : FORT=27TO60STEP33 : PRIN 
T#-2,TAB(T) "LONG LAT"; :NEXT:PRI 
NT#-2 : F0RN=1T0113STEP8 : C= (N+7 ) /8 
:X$(1)=I$(C) :X$(2)=I$(C+15) :Y$(1 
) =MID$ (LC$ , N , 8 ) : Y$ ( 2 ) =MID$ (LC$ , N 
+120,8) 

53 5 A=10:FORZ=1TO2:PRINT#-2,TAB( 
A) X$ ( Z ) TAB ( A+17 ) LEFT$ ( Y$ ( Z ) , 4 ) TA 





48> 



Keep track with 

Baseball Statpak 



Finally, Big League Stats for your Color Computer! 
Baseball Statpak will make you a winner with your play- 
ers. Keep track of up to 180 batters and 60 pitchers on 
12 teams. Perfect for Little League, high school, ama- 
teur Softball. 

Baseball Statpak contains three separate programs 
to track at bats, runs, hits, errors, walks, home runs, 
RBI's, on-base-percentage, innings pitched, earned 
runs, strikeouts and lots more. Also keeps track of 
team standings for league statistics. Store your data on 
tape or disk. 

Lightning-fast machine language sort will order your 
data by any stat for startling screen displays and beauti- 
ful printed reports! 

You've seen these stats in the newspapers. Now 
you can have them for your team! Baseball Statpak re- 
quires 16K Extended Basic for tape version, 32K for 
disk. CoCo 3 compatible. Only $34.95 on tape or disk. 



The Handicapper 



Use your Color Computer to improve your perfor- 
mance at the track! Separate handicappers for Thor- 
oughbreds, Harness Horses and Greyhounds let you 

rank the horses or dogs in each race quickly and easily, 
even if you've never handicapped before! 

All the information you need is readily available in 
the Thoroughbred Racing Form, harness or dog track 
program. Data entry is quick and easy. We even provide 
a diagram showing you where to find the data! 

Written by a veteran handicapper, our programs use 
sound, established techniques and the power of your 
computer to cut handicapping time from hours to min- 
utes. Ratings are displayed on screen or sent to your 
printer. Our instructions and wagering guide tell you 
which races to bet and which to avoid — a real secret of 
good handicapping. 

The handicappers require 16K for tape versions, 
32K for disk. They're all CoCo 3 compatible, too! Thor- 
oughbred, Harness or Greyhound Handicappers, 
$39.95 each on tape or disk. Any two for $59.95, all 
three only $79.95. 

Federal Hill Software 

8134 Scotts Level Road 

Baltimore, Md. 21208 



Toll free orders 800-628-2828 Ext 850 
Information 30 1 -52 1 -4886 
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B(A+23)RIGHT$(Y$(Z) ,4) ; :A=A+33:N 

EXTZ : PRINT#-2 : NEXTN : IFQT>0THENRE 

TURN 

540 PRINT#-2,CHR$(18) :POKE32431, 

255:P=USR(0) :PRINT#-2,CHR$(30) :F 

ORN=1TO10:PRINT#-2:NEXT:IF QT>0T 

HEN RETURN ELSE GOTO90 

545 ' 

55p i*** I DENT *** 

555 LO$="BABEBIBRCACOCUDOGAGCGRH 

AH0JAJMKEMIM0MYNANENIN0PEPUSATA7.' 

RWIYU" 

560 CLS1:K$="":F0RN=1T02 9STEP2:P 

RINTI$(N) ,I$(N+1) :NEXT 

565 IFJ>0THENCOLOR1:LINE(IX,IY)- 

(I,J) ,PSET 

570 A$=INKEY$ : IFA$=" "THEN570ELSE 

IFASC(A$)=13THEN90 

575 K$=K$+A$:IFLEN(K$)<2THEN570 

580 CLS1:F0RN=1T059STEP2:Z$=MID$ 

(L0$,N,2) :Q=(N+1)/2:IFZ$=K$THENG 

OTO 590 

585 NEXT:IFK$=""THEN90ELSE560 

59JZS P$=MID$(LC$, (8*Q)-7,8) :I=VAL 

(LEFT$(P$,4) ) :J=VAL(RIGHT$(P$,4) 

) :P$="" 

595 1=5* (100-1) :J=5*(40-J) 

600 SCREEN1 ; 1:COLOR0:LINE(I, J) -( 

X, Y) ,PSET:IX=X:IY=Y:DX=ABS (I-X) : 

DY=ABS(J-Y) :H=SQR(DX A 2+DY A 2) :V=1 

1.3*H:C$=STR$(INT(V) ) :L=LEN(C$) : 

C$=RIGHT$ (C$ , L-l) : L=L-1 : LX$=C$ : G 

OSUB3 80 

605 COLOR1:LINE(130,8) -(210,26) , 

PSET,BF:DRAW"C0BM130,15":FORZ=1T 

0L:DRAWN$(VAL(MID$(C$,Z,1) ) ) :NEX 

T : DRAW" BR3 " +L$ ( 13 ) +L$ ( 9 ) + " BR6 " 

610 LC=INT(VAL(LX$)/S+.5) :LX$=ST 

R$(LC) :L=LEN(LX$)-1:LX$=RIGHT$(L 

X$,L) :Y$="":FORZ=lTOL:DRAW N$ (VA 

L(MID$(LX$,Z,1) ) ) : NEXT: DRAW" BR3" 

+L$(8) :N=ASC(LEFT$(K$,1) )-64:W=A 

SC (RIGHT$ (K$ , 1) ) -64 : DRAWC0BM155 

,25"+L$(N)+L$(W) : RETURN 

615 ' 

620 '** RECORD ON TAPE ** 

62 5 CLS:PRINT@160," READY TO SAV 

E ON TAPE ": PRINT" PRESS ANY KEY 

WHEN READY" :EXEC44539 
630 OPEN"0",#l,"HURRDATA":WRITE# 
1,U:FORN=0TOU:WRITE#1,D1(N) ,D2(N 
) :FORW=0TO5:WRITE#1,D$(N,W) :NEXT 
W , N : CLOSE# 1 : RETURN 
635 ' 

640 CLEAR650:PCLEAR8:GOTO 15 
645 ' 
650 
655 



i*** LETTERS *** 

DIML$ (28): F0RN=1T02 8 : READL$ ( 



U4E2F2D2L4R4D2BR3 
U6R3F1D1G1L3R3F1D1G1L3B 



U6L1R4F1D4G1L4BR8 
BR4L4U3R3L3U3R4BD6BR3 
U3R3L3U3R4BD6BR3 
BE4BU1H1L2G1D4F1R2E1U2L 



N) :NEXT 

660 DATA 

665 DATA 

R7 

670 DATA BR4 BU1G1L2H1U4E1R2F1BD 

5BR3 

675 DATA 

680 DATA 

685 DATA 

690 DATA 

1R2BD3BR3 

695 DATA U6D3R4U3D6BR3 

U6BR3BD6 

BU1F1R2E1U5BR3BD6 

U6D4E4G3F3BR3 

U6D6R4BR3 

U6D1F3E3U1D6BR3 

U6F5U5D6BR3 

BR1H1U4E1R2F1D4G1L2BR6 

U6R3F1D2G1L3BR7BD2 

BR1H1U4E1R2F1D4G1H1F2H1 



700 
705 
710 
715 
7 20 
725 
730 
735 
740 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
L2BR6BD1 
745 DATA 
7 50 DATA 
F1BD5BR3 
755 DATA 
760 DATA 
7 65 DATA 
770 DATA 
BR3BD6 
775 DATA 



U6R3F1D2G1L3R2F2BR3 
BU1F1R2E1U1H1L2H1U1E1R2 

BR2U6L2R4BD6BR3 
BU6D5F1R2E1U5BR3BD6 
BU6D4F2E2U4BR3BD6 
BU6D5F1R1E1U5D5F1R1E1U5 



780 
785 
790 
795 
800 
805 



U1E4U1BL4D1F4D1BR3 
DATA BU6D2F2D2U2E2U2BR3BD6 
DATA BU6R4D1G4D1R4BR3 
DATA BR1H1U4E1BD6BR3 
DATA E1U4H1BR5BD6 
i***** NUMBERS 
DIMN$ ( 10 ) : FORN=0TO10 : READN$ ( 



BR1H1U4E1R2F1D4G1L2BR6 
BU5E1D6BR3 

BU4U1E1R2F1D1G4R4BR3 
BU6R4G2L1R2F1D2G1L2H1BD 

BR4U6G4R5BD2BR3 
BU1F1R2E1U2H1L3U2R4BD6B 



N) :NEXT 
810 DATA 
815 DATA 
820 DATA 

82 5 DATA 
1BR7 
8 30 DATA 

83 5 DATA 
R3 

840 DATA BE4BU1H1L2G1D4F1R2E1U1H 
1L2G1BD2BR7 

84 5 DATA BR1U1E4U1L5BD6BR8 

850 DATA BE3E1U1H1L2G1D1F1R2F1D1 

G1L2H1U1E1BD3BR6 

855 DATA BU1F1R2E1U4H1L2G1D1F1R2 

E1BD4BR3 

860 DATA U1R1D1BR3 

865 ' 

870 '***** TITLES 

875 DIMT$(12) :F0RN=1T012 :READT$( 

N) :NEXT 
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88j3 DATA 20091305,12151407,12012 

0,040918,1916050504,2 309140419,1 

31604,2 721281604012005,271828052 

209052 3,27092804051420,271628180 

91420,271728210920 

885 ' 

890 '***** DIRECTIONS 

895 DIMC$(15) :FORN=0TO15:READC$( 

N) :NEXT 

900 DATA N,NNW,NW,WNW,W,WSW,SW,S 

SW , S , SSE , SE , ESE , E , ENE , NE , NNE 

905 ■ 

910 i***** LOCATE ID 

915 DIM I$(30) :FORN=1TO30:READI$ 

(N) :NEXT 

920 DATA (BA)RBADOS, (BE)RMUDA, (B 

I)LOXI, (BR)OWNSVILLE, (CA)PE HATT 

ERAS, (CO)RPUS CHR, (CU)BA, (DO)M R 

EPUBLIC, (GA)LVESTON, (GC)AYMEN IS 

, (GR)ANADA, (HA)ITI, (HO)NDURAS, (J 

A)CKSONVILLE, (JM)AICA 

925 DATA (KE)Y WEST , (MI) AMI , (MO) 

BILE, (MY)RTLE BEACH, (NA) SSAU, (NE 

)W ORLEANS, (NI)CARAGUA, (NO)RFOLK 

, (PE)NSACOLA, (PU)ERTO RICO, (SA)V 

ANNAH, (TA)MPA, (TR) INIDAD, (WI)LMI 

NGTON, (YU) CAT AN PEN 

930 LC$="59.513.4 64.63 2.488.730. 



697.2 2 6.075.3 3 5.597.3 27.979.022. 
070.019.094.7 29.581.219.561.612. 
372.218.78 6.015.081.530.3 77.018. 
081.824.7 80.025.887.831.07 9.033. 
579.2 25.290.030.085.013.076.03 6. 
887.030.666.518.581.032.082.028. 
061.310.878.03 4.188.021.0 
935 >***** w$ STRING 
940 F0RN=1T028:READA$:W$=W$+A$:N 
EXTN 

945 DATAA,B,C,D,E,F,G,H,I,J,K,L, 
M,N,0,P,Q,R,S,T,U,V,W,X,Y,Z,[,] 
950 

955 ' ** TEST SQUARES ** 
960 EXEC44539:PMODE4,l:PCLSl:SCR 
EEN1,1:Z$="2308090308XX03 1512 151 
8 " : DRAW" C0BM9 5 , 80 " : F0RN=1T02 1STE 
P2:X$=MID$(Z$,N,2) :X=VAL(X$) : IFX 
=0THENL$ (X) ="BR8" 

965 DRAWL$(X) :NEXT: Z$="" : COLOR0 : 
LINE ( 115 , 90 ) - ( 12 5 , 100 ) , PSET , B : PO 
KE178,1: PAINT (120, 95) , ,0:COLOR0: 
LINE ( 13 6 , 90 ) - ( 14 6 , 100 ) , PSET , B : PO 
KE178,2:PAINT(140,95) , ,0:DRAW"C0 
BM119,115"+N$(1) :DRAW M C0BM+16,0" 
+N$(2) :SOUND150,1 

970 A$=INKEY$ : IFA$=" "THEN970ELSE 
PC=VAL(A$) :IF PC<1 OR PC>2 THEN 









k)m<s k-S(sm FOR $149.00 



the speech synthesizer that leaves the others tijht lipped 



FINALLY . . . 



^ 




* No more tumbling with Hultl-Pac or Y-Connectors 

* No vocabulary ROM or disk needed 
'~ * Compatible with all operating systems 

* No driver program needed 

* Appears as a printer to Co-Co 

Speak-Easy plugs into the serial 
port of your Co-Co, not the card 
slot, and appears as a printer 
to the Co-Co. Incorporated 
Speak-Easy is a unique state of 
the art two chip set which 
phonetically converts ASCII text 
to speech. What this means to 
you Is extreme ease of use,*} 
virtually unlimited vocabulary, 
and complete flexability in a 
speech synthesizer. Just look at 
this sample BASIC program: 
10 INPUT Ai 
20 F'*INT M-2, A* 

so *aro 10 
and imagine how you could 
upgrade your games and 

applications with simple printer 
statements to use Speak-Easy. It 
can say anything including 
foreign words. If you can spell 
it, Speak-Easy can say it. 
Also available in RS-232C configuration with 
selectable baud rate, word length and stop bits. Choose 
between A pin DIN or DB-25 connectors. If you have a 
special need or configuration, let us know, we will have 
you talking in no time! 



Horvev »ay*, Fine 
oil. for dinner. * 




LArMMi} (Mm®,&E. 



, i n <it.d. 



••«(. 



jlOO In. StHI 

SS 00 ouM.d. u 

poo I... coc 

I. odd )V. ,„(„ 



539 McDaniel Mill Rd . Visa and MasterCard 

Conyers, Ca. 30207 phone 404-929-1657 welcome 

ceo 



m 



PROGRAMS • PCP.lPMtP.AlS • SUPPl >£ S • SfVlCI 



For Coco . . . 

in the Midwest 

Now in our 5th year! 



Awt&x t200 7KmU*k 





•300/1200 

Baud 
•Auto 

dial 

Aulo answer 
•Hayes command set 



Avatex1200 S 99. 00 
with Coco Cable 109. 00 

COMPLETE SYSTEM... 

Avatex 1200, Cable <tH QQ 00 
AUTOTERM Software 



$139.' 




CHOOSE FROM OUR LARGE SELECTION OF COCO PRODUCTS 

85 ... Colorware .. Derringer ... Diecom ... Dynacalc ... Elite ... HJL 

J & M ... Mark Data ... Metric Industries ... Michtron .. Microcom ... 

Microworks .. Tom Mix ... PBJ ..PXE ... Spectrum Projects ... 

Speech Systems ... Sugar ... TCE .. VIP ... Zebra ... and more' 



»Call» • Shop by Modem • 

513-396SOFT 513-396-SHOP 



I/.T.HUH.yi I 



Write 
2235 Losantiville, Cincinnati. OH 45237 

SHIPPING will M chargad >l our ACTUAL COST 
Ohio residents idd 5.5% SUti Til COD add 2.00 
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Unbeatable Prices from Howard Medical Computer 
Star NX-10 Printer Only $238 



disk NEW FROM J&M 

CONTROLLER 

The DC-4 is a scaled-down version of the popular DC-2 
without a parallel port. It includes a switch with 2 ROM 
sockets, JDOS. manual and such features as gold connec- 
tors and metal box. It accesses double sided drives and ac- 
cepts RSDOS 1.1 for Radio Shack compatability. 

DC-4 

($2 shipping) 

RS DOS ROM CHIP 

ROM chip fits inside disk controller. 24 pin fits both J&M 
and RS controller Release 1.1. For CoCo 3 Compatability. 



$20 



each 



Reg. S40 
($2 shipping) 



DISK DRIVE SPECIALS 

UlllVC \J i ■ Howards Drive gives you a 
DD-3 MPI drive, a CA-1 cable and a J&M DC-4 Disk Controller 
for only 

( s 5 shipping) 
Add $34 for a Disto DC- 3. 

Separate Disk Drive Components 

DD-3 An MPI 52 double-sided, double density, 360K disk 
drive in a full height case and heavy-duty power supply. 



$17845 



$98 



( s 5 shipping) 



DD-2 A TEAC 55B '/a height, double density, 360K disk 
drive in a Vi height case and heavy-duty power supply. 



$188 

55B TEAC bare 
density with all m 

$118 



( s 2 shipping) 



55B TEAC bare drive, Vi height, double-sided, double 
density with all mounting hardware fits R.S. 501. 



(S3 shipping) 



52 MPI's bare drive, full height, double- sided, double 
density with all mounting hardware. 360K. 

S7Q (S4 shipping) 

CA-1 Cable that connects the disk controller to one drive. 



$2495 



GUARANTEE — Howard Medical's 30-day guarantee 
is meant to eliminate the uncertainty of dealing with a com- 
pany through the mail. Once you receive our hardware, try 
it out, test it for compatibility. If you're not happy with it for 
any reason, return it in 30 days and we'll give you your 
money back (less shipping). 



Incredible Savings on Printers! 



EPSON 



LX-86 
FX-86E 
FX-286E 
EX-800 



SALE 
PRICE 

SALE 
PRICE 

SALE 
PRICE 

SALE 
PRICE 



$238 
$439 
$603 
$503 



EX- 10000 
LQ-800 
LQ-1000 
LQ-2500 



$553 



£S£ $692 

SALE 
PRICE 

££ $792 

pr£ $1246 



Star NX-10 Only $238 



WORD PACK RS 

This ROM pack is the hardware answer for an 80 column 
display. It includes a built-in video controller to drive a 
monochrome monitor like our 123A. To get started, you need 
OS-9 2.0, a Y-cable or multipack interface drive 0, and a 
monochrome monitor. 



$89 



($2 shipping) 



New basic driver runs word pack without 
need for an OS-9. 



$10 



Smith Corona XE 6100 

The Smith Corona 6100 is state of the art for today's 
typewriters. It operates as a standard typewriter or it con- 
nects to the color computer via a serial/parallel convertor 
box. The Smith Corona has a 50,000 word dictionary that 
signals every time you misspell a word. Then with a one key 
corrector — lifts off the word so it can be retyped correctly. 
The 6100 comes with all the standard selection features like 
auto indent, underline, repeat key, centering and carries a 
90 day warranty on parts and labor. 



$298 



Reg. S449 (S7 shipping) 



Messenger Module connects the Smith Corona, XE 6100 
& 6000, SE 2000, SD 3000, and XD 7000 & 8000 to the color 
computer or Tandy 1000/IBMP.C. 



$98 



Lets the graphic capabilities 
of your CoCo EXPLODE 



COCO $TO 45 

MAX II */»■ 

Y CABLE $ 1 9- 45 

MAX ^ j*. 4T% Three sets include 72 different 

FONTS Ow fonts ,or t yp ese,,in 9 

COLORING $1 5 
BOOK 



Needed to connect CoCo 
Max and disk drive at same 
time. 



Twenty-two pictures of clip-art 
by Glenside Color Computer Club 



($2 shipping for each product) 



Howard Medical Computers 1690 N. Elston Chicago, IL 60622 




ORDERS 



(800) 443-1444 



INQUIRIES AND ORDER STATUS 

(312) 278-1440 



Showroom Hours: 
8:00- 5:00 Mon. - Fri. 
10:00 - 1:00 Sal. 



WE ACCEPT: VISA • MASTERCARD • AMERICAN EXPRESS 

C.O.D. OR CHECKS • SCHOOL PO.'S Shippmgchargesa.efo.^sla.es. 

APO and Canada order slightly higher. 
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The Bigger 

The Best 

Th e \ndispensable 



The 




THE COLOR COMPUTER MONTHLY MAGAZINE 



THE RAINBOW is the biggest, best, brightest and 
most comprehensive publication a happy CoCo 
ever had! THE RAINBOW features more programs, 
more information and more in-depth treatment of 
the Tandy Color Computer than any other source. 

A monthly issue contains more than 200 pages 
and up to two dozen programs, 14 regular columns 
and as many as 20 product reviews. And advertise- 
ments: THE RAINBOW is known as the medium for 
advertisers — which means every month it has a 
wealth of information unavailable anywhere else 
about new products! Hundreds of programs are 
advertised in its pages each month. 

Every single issue of THE RAINBOW covers the 
wide spectrum of interests in the Tandy Color 
Computer — from beginners' tutorials and arcade 
games to telecommunications and business and 
finance programs. Helpful utilities and do-it- 
yourself hardware projects make it easy and fun to 
expand your CoCo's capabilities. And, monthly 
reviews by independent reader reviewers take the 
guesswork out of buying new software and hard- 
ware products. 

Join the tens of thousands who have found THE 
RAINBOW to be an absolute necessity for their 
CoCo. With all this going for it, is it surprising that 
more than 90 percent of THE RAINBOW subscrib- 
ers renew their subscriptions? We're willing to bet 
that, a year from now, you'll be doing the same. 
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Rainbow On Tape 

& Rainbow On Disk! 



— great ways to bring THE RAINBOW into your life. 
Each month, all you do is pop the tape into your 
cassette player or the disk into your drive. No more 
lost weekends. As soon as you read an article about 
a program in THE RAINBOW, it's ready to load and 
run. No work. No wait. 

Just think how your software library will grow. 
With your first year's subscription, you'll get almost 
250 new programs: games, utilities, business 
programs, home applications. And, with RAINBOW 
ON DISK, you'll also get all the OS-9 programs. 

RAINBOW ON TAPE and RAINBOW ON DISK — 
they're the "meat" of THE RAINBOW at a price that's 
"small potatoes." And now you even have a choice 
about how it should be served up to you. 

To get your first heaping helping, just fill out and 
return the attached reply card. No postage neces- 
sary. 
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INPUT RECORDED DATA *** 
985 CLS:PRINT@194,"INPUT SAVED D 
ATA? <Y/N>" 
990 A$=INKEY$ : IFA$=" "THEN990ELSE 

IF A$="N"THEN 1/315 
100 jS OPEN" I " , # 1 , "HURRDATA" : INPUT 
#1,U:FORN=0TOU:INPUT#1,D1(N) , D2 ( 
N):FOR W=0 TO 5: INPUT#1, D$ (N, W) 
:NEXTW,N:CLOSE#l 
1010 •** DRAW MAP ** 
1/315 PM0DE4,5:PCLS1:SCREEN1,1:C0 
LOR0:IF RS=1 GOSUB2 80 :RS=0 :U=-1 
1020 READA, B, C, D: LINE (A, B) - (C, D) 
,PSET 

.102 5 READC , D : IFC=0THEN1020ELSEIF 
C=-1THEN1030ELSELINE- ( C , D) , PSET : 
GOTO 1025 

103/3 F0RN=1T03:READA,B,C,D:LINE( 
A,B)-(C,D) ,PSET:NEXT 
1035 POKE178,PC 

104/3 F0RN=1T07:READ C, D: PAINT (C, 
D) , ,0: NEXT: PSET (192, 139,0) 
1045 DATA130,0,126,5,125,5,125,4 
,123,2,123,4,125,7,122,15,121,15 
, 121 , 8 , 120 , 8 , 120 , 3 , 119 , 3 , 119 , 13 , 
120,17 



DATA121,20,111,25, 

100,35,95,40,94,46 
)8, 58, 100, 65, 100, 74 
)3,71 

DATA92,71,88,62,89 
56,81,50,75,52,70,4 

61,48,55,48,50,47, 

DATA53,53,56,54,55 
55,45,52,37,51,32,5 
,14,61,14,70,13,89, 



DATA42,106 
48,102,48, 

56,92,67,94 

59,117 
DATA59,119 
85,125,85, 

.50,95,154, 

51,117,162, 
DATA12 2,15 
143,140,13 
139,141,14 
152,143,15 
DATA143,14 
146,170,14 
145,189,14 
155,198,15 



,43,107, 
97,51,95 
,67,95,6 

,61,120, 

127,83,1 

103,151, 

120,160 

9,124,14 

7,143,13 

1,142,14 

2,144,14 

4,152,14 

6,173,14 

6,185,14 

6,200,15 



111,30,10 
,94,50,96 
,99,74,96 

,60,87,61 
8,62,48,6 
49,48,55, 

,55,52,54 
1,26,53,2 

20,105,30 

45,106,44 
,57,94,63 
4,100,60, 

80,120,82 
31,83,145 
109,152,1 

6,126,143 
6,144,137 
5,14,0,15,0 
9,142,146 
1,158,143 
9,180,145 
7,195,151 
5,203,160 
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DISH DRtUES 

NEW--) DRIVE SYSTEM <2 DSDD DRIVES ACCESSED 

UNDER R5 DOS) *-j:.429.9=. 
2 DRIVE SYSTEM *-<£ DSDD DRIVES IN ONE CASE J 
*329.9S 

DRIVE 1 UPGRADE (1 DSDD UPGRADE FOR YOUR 

£G-31E9,3131, OR 3132-H19.95 PLEASE 

SPECIFY CATALOG NUMBER WHEN ORDERING • ! 

DRIVE 0-SSDD F.-H DRIVE X -«. 99.55 

DRIVE 1-SSDD FxH DRIVE (USE W/EXISTING DRO> 
tt.25.95 

*- INCLUDES EITHER R.S. OR DISTO CONTROLLER 



COCO 3 

S12K UPGRADE-J109.9E TECH MANUAL-J29.9S 
RAM DISK I DIAGNOSTICS -M9.95 
MONITOR CONNECTOR FOR CM-6-J4.95 

□THER STUFF 

COCO GRAPHICS DESIGNER-J29.9S AD0S-J29.9S 
MONITOR INTERFACE -J29.9S 
KEYB0ARDS-J24.9S ADAPTERS-S9.95 
SERIAL TO PARALLEL CONVERTERS -SA4.3S 



FULL LINE OF 



PRINTERS IN STOCK ! ■ ! 



CALL FOR BEST PRICES f^l 



ins \BsbsebBsm SaiOir 

5512 POPLAR MEMPHIS, TN 33119 901-761-4565 

ADD J4.90 FOR SHIPPING AND HANDLING. YISA.MC t MONEY ORDERS ACCEPTED. 
ALLOW 3 WEEKS FOR PERSONAL CHECKS.- NO CODS. PRICES MAY CHANGE WITHOUT NOTICE 
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, 164 , 106 , 170 , 106 , 172 , 107 , 172 
, 108 , 169 , 109 , 164 , 109 , 164 , 106 
1120 DATA 0,0,91,77,93,77,92,78, 
91,78,91,77,0,0,110,74,111,74,11 
3,81,112,81,111,79,109,77,109,76 
,110,74| 

1125 DATA0, 0,123, 22, 124, 22,124, 2 
3,123,23,12 3,22,0,0,191,145,196, 
145,195,146,195,148,194,149,191, 
149,192,148,192,146 
1130 DATA191, 145, 0,0, 202,133, 203 
,133,203,134,202,134,202,133,-1, 
-1,0,115,0,0,0,0,130,0,112,165,2 
05 , 165 ,5,5, 100 , 87 , 140 , 105 , 167 , 10 
8,110,109,111,77,194,147 
1135 '** DRAW TITLES ** 
1140 COLOR0:FORN=0TO144STEP24:LI 
NE(212,N)-(250,N+24) ,PSET,B:NEXT 
-1145 B=10:X$="":FORN=1TO7 
1150 L=LEN(T$(N) ) 
1155 F0RZ=1T0L-1STEP2 
1160 Z$=MID$(T$(N) ,Z,2) :W=VAL(Z$ 
) :X$=X$+L$(W) 

1165 NEXTZ:DRAW"C0BM215,"+STR$(B 
) +X$ : X$=" " : B=B+24 : NEXTN 
1170 DRAW"S4C0BM0,185":FORN=8TO1 
2 : X$=" " : L=LEN (T$ (N) ) : F0RZ=1T0L-1 
STEP2:Z$=MID$(T$(N) ,Z,2) :W=VAL(Z 
$) :X$=X$+L$(W) :NEXTZ:X$=X$+ M BR5" 
:DRAW"C0BM+4,185"+X$:NEXTN:H$="0 
82118180903011405" :X$="" 
1175 DRAWS4C0BM0 , 150" : F0RN=1T01 
7STEP2:W=VAL(MID$(H$,N,2) ) : DRAWL 
$(W) :NEXT 

1180 DRAW"S8C0BM0,170":FORN=1TOL 
EN(HN$) :N$=MID$(HN$,N,1) :F0RZ=1T 
02 6 : IFMID$ ( W$ , Z , 1 ) =N$THENDRAWL$ ( 
Z) :GOTO1190 
1185 NEXTZ 
1190 NEXTN :F0: 
RETURN 
1195 • 
1200 "END***** 



1085 



85 DATA205, 165,0,0,0, 114, 2, 11 
,20,120,27,118,33,120,40,125,45, 
130,50,130,60,134,61,133,63,134, 
61,135,71,143 

1090 DATA71 , 148 , 75 , 151., 76 , 150 , 74 
,148,82,154,82,155,98,159,100,15 
9,103,157,104,157,105,158,113,16 
5,0,0,176,38,177,38 
1095 DATA177,39,176,39,176,38,0, 
0,78,90,81,85,90,83,100,85,104,8 
8,106,88,115,91,120,93,122,95,12 
5,96,128,97 

1100 DATA128,98,130,98,125,100,1 
24,99,105,100,113,99,115,97,109, 
95,108,93,106,94,102,92,95,90,90 
,88,92,87,88,87 

1105 DATA83,89,82,88,79,91,78,90 
,0 ,0 , 93 , 103 , 95 , 103 , 95 , 104 , 93 , 104 
,93,103,0,0,107,108,116,107,119, 
109,119,110 

1110 DATA110,110,107,109,107,108 
,0,0,129,107,137,107,13 6,102,133 
, 101 , 137 , 107 , 13 6 , 102 , 13 3 , 101 , 13 
,100,150,100,153,104,155,105,159 
,107,158,108,152,107 
1115 DATA149 , 109 , 147 , 107 , 143 , 111 






, 140 , 111, 140 , 109 , 130 , 109 , 129 , 107 




About Your Subscription 



Your copy of the rainbow is sent second class 
mail. You must notify us of a new address when 
you move. Notification should reach us no later 
than the 15th of the month prior to the month in 
which you change your address. Sorry, we cannot 
be responsible for sending another copy when you 
fail to notify us. 

Your mailing label also shows an account 
number and the subscription expiration date. 
Please indicate this account number when renew- 
ing or corresponding with us. It will help us help 
you better and faster. 

For Canadian and other non-U. S. subscribers, 
there may be a mailing address shown that is 
different from our editorial office address. Do not 
send any correspondence to that mailing address. 
Send it to our editorial offices at Falsoft, Inc., The 
Falsoft Building, P.O. Box 385, Prospect, KY 40059. 
This applies to everyone except those whose 
subscriptions are through our distributor in 
Australia. 
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HOME HELP 



No more mystery meat surprises 




Banishing the Freezer 
Burn Blues 



By Robert Griffard 




Some programs have been known 
to convince the non-computer 
user of the value of using a com- 
puter. The Freezer is just such a pro- 
gram. After finding items in the deep 
freeze that had been there too long and 
were suffering from freezer burn, my 
wife accepted the use of this program, 
on an experimental basis, until it elim- 
inated the problem. 

By keeping track of the items being 
placed in the freezer by date, items can 
be rotated through deep freeze storage 
so that the oldest items are removed 
first. Items placed in the deep freeze are 
normally marked with contents of the 
package and date. The only additional 
marking required for control is a pack- 
age number; numbers are easier to 
search for than names when looking for 
ar. item. 

The program is user-friendly, so that 
just following the screen instructions 
allows even the most inexperienced 
computer user to use the program. The 
only caution is the category of items 
must agree with the categories listed in 
Line 610. Printing the contents by 
category provides an aid to menu plan- 
ning. 
The opening screen, generated by 

Bob Griffard is a retired U.S. Air Force 
officer. He supervised a large, main- 
frame computer facility supporting the 
military command and control func- 
tion. His current interest is program- 
ming the CoCofor home management. 



lines 1 to 29, is an example of adding 
a little pizazz to the program by using 
the Title Maker program by Fred 
Scerbo in the March 1986 issue. 

This program was originally written 
for the Radio Shack CGP-115. This 
very capable printer uses 4'/i inch wide 
roll paper. This size proved to be a most 
convenient size to hang on the side of 
the freezer, and I still use it with my 
Gemini 10X printer. The printer codes 
in lines 630 and 660 are for the Gemini 
printer and do not establish a page 
break since roll paper is used. Addition- 
ally the type codes used in Line 610 must 
be used or changed to obtain a print by 
category of the freezer contents. 



The Search for Item function (lines 
670-700) uses the IN5TR instruction so 
that any item containing the input string 
will be displayed on the screen. For 
example, if ST is listed as the search 
string, all items containing this combi- 
nation of letters will be displayed. You 
would then see roast, steaks, steamer 
clams, stew meat, etc. 

Different methods have been used to 
control scrolling of the screen display. 
Line 330 compares the division of the 
item number by screen lines with the 
integer of the division of the item 
number by screen lines to control scrol- 
ling. Lines 390 and 680 count the lines 
printed to control the scrolling. D 
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The listing: FREEZER 

1 CLS0:FORI=1TO 416 .-READ A:PRIN 
TCHR$(A+12 8) ; : NEXT 

•x HATA 

J '-'"■ ■ Ln - 1 i i i i i i i i i i i i i i i i i i i i i i i i i 

5 DATA, ,,,, ,63,48,48,63, ,63,48, 6 
3, ,55,60,59, ,6/8,63, 6/3,, 63, 60,60, 

7 DATA, ,,,, ,63,54,57,63, ,63,60,6 
3, ,63,60, 63, ,48,63,4 8, ,60, 60,63, 

9 DATA, ,,,, ,52,56,52,56, ,60,48,6 
, , 60 , 48 , 60 , , 4 8 , 60 , 4 8 , , 60 , 60 , 60 , 

11 ' DATA,,,,,, ,,,,84, 95 ,88,, 95, 91 

, 80, y o , , , ,,,,,,,,,,, 

13 DATA,,,,,, ,,,,80, 95, 80,, 95, 84 

,"-»■, y- 3 ;/, i i i i i i i i i i i 

15 DATA,,,,,, , ,,,84, 92, 88,, 92, 80 
,o4,y<£,,,,,,, ,,,,,,, 
17 DATA, ,,,,,, ,124,127, 124, , 127, 
112, 127,, 127, 124,124,,,, ,,,,,,,, 

19 DATA, ,,,,,,, 112 , 127 , 112 , , 127 , 
124,127, ,127,124,124, ,,,,,,,,,,, 

21 DATA, ,,,,,, ,112, 124, 112, ,124, 
112,124, ,124,124,124,,,, ,,,,,,,, 

23 DATA, ,47,44,44, ,47,44,47, ,47, 

44,44, ,47,44,44, ,44,44,47, ,47,44 

,44, ,47,44,47,,, 

25 DATA, ,47,44,44, ,47,45,34, ,47, 

44,44, ,47,44,44, ,35,44,32, ,47,44 

,44, ,47,45,34,,, 

27 DATA, ,44,32,32, ,44,32,44, ,44, 

44, 44,, 44, 44, 44,, 44 ,44, 44,, 44, 44 

,44, ,44,32,44,,, 

29 FOR X=l TO 1200 :NEXT 

50 REM ITEM TYPES MUST AGREE WIT 

H TYPES LISTED IN LINE 610 TO PR 

INT 

60 REM PRINTOUT FORMATTED FOR NA 

RROW PAPER FOR EASE OF USE 

70 REM CODES IN THE PRINT SECTIO 

N-LINES 600 TO 660 - ARE FOR GEM 

INI 10X 

80 REM PROGRAM REQUIRES EXTENDED 

COLOR BASIC 
100 REM FREEZER INVENTORY 



110 ' BOB GRIFFARD 

120 ■ 129 STAGE RD. NEWPORT NEWS 

VA. 23606 

130 ' PHONE (804) 596 8440 

140 GOTO740 

150 CLEAR3000:DIMT$(105) ,I$(105) 

,M$(105) ,P(105) ,Y(105) :M=106:Z$= 

CHR$(13 4) 

200 ID$=" FREEZER INVENTORY" : GO 

SUB7 50:PRINTTAB(3)" FILE CONTAIN 

S";B;" ITEMS" : PRINT: PRINT" DO YO 
U WANT TO : " : PRINT : PRINTTAB ( 5 ) "<1 
> ADD ITEMS TO THE LIST" -.PRINTTA 
B(5)"<2> VIEW TOTAL FILE" 
210 PRINTTAB (5 )"<3> VIEW ITEMS B 
Y TYPE" : PRINTTAB ( 5) "<4> DELETE I 
TEMS FROM FILE" 

220 PRINTTAB (5) "<5> SAVE FILE ON 
DISK" : PRINTTAB (5) "<6> LOAD FILE 
FROM DISK": PRINT TAB(5)"<7> PRI 
NT HARD COPY":PRINT TAB(5)"<8> S 
EARCH FOR AN ITEM" : PRINTTAB (5) "< 
9> QUIT" 
230 INPUT"ENTER YOUR CHOICE <1 T 

9>";A:IF A<1 OR A>9 THEN 200 
240 ON A GOTO 250,320,380,450,53 
0,570,600,670,760 

250 ID$=" ADD ITEMS" : GOSUB7 
50: PRINT: PRINT" INPUT DATA AS RE 
QUESTED. ": PRINT" TO STOP, ENTER 
end FOR 'TYPE' ." 

2 60 PRINT :B=B+1: IF B=M THEN 310 
270 INPUT" TYPE";T$(B) : IF T$(B)= 
"END"THEN 300 

280 INPUT" ITEM" ; 1$ (B) : INPUT" PA 
CKAGE NO" ; P (B) : INPUT" DATE — MONT 
H,YEAR";M$(B) ,Y(B) :ID$=" LI 
STING" :GOSUB750:PRINT"TYPE", 'TAB ( 
8) "ITEM" ; TAB (21) "PKG" ;TAB (25) "DA 
TE":PRINTT$(B) ;TAB(8)I$(B) ;TAB(2 
l)P(B) ;TAB(25)M$(B) ;TAB (29) Y (B) 

2 90 GOTO 2 60 

300 B=B-1:GOTO200 

310 PRINT: PR INT "SORRY THE FILE I 
S FULL":INPUT"PRESS <ENTER> TO R 
ETURN TO MENU";R$:GOTO200 

3 20 CLS:'LIST OF FILE 

3 30 PRINT" CONTENTS AS OF " ; D$ : P 
RINT"TYPE" ; TAB (10) "ITEM" ; TAB (19) 
"PKG", -TAB (25) "DATE" : PRINT: FOR N= 

1 TO B:PRINTT$(N) ;TAB(7) I$(N) ;TA 
B(19)P(N) ;TAB(24)M$(N) ;TAB(27)Y( 
N):IF N/12=INT(N/12) THEN340 ELS 
E350 

3 40 INPUT" PRESS<ENTER>TO CONTINU 

E";R$:CLS: PRINT "TYPE", -TAB (10) "IT 

EM" ; TAB (19) "PKG" , -TAB (25) "DATE":P 

RINT 

3 50 NEXT N:PRINT@44 8,"<1>=REVIEW 

LISTING <2>= MENU"; 
360 F$=INKEY$:IF F$=""THEN360 
370 IF VAL(F$)=1THEN320 ELSE 200 



38 
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DataPack II Plus V4.I 

SUPER SMART TERMINAL PROGRAM 

AUTOPILOTand AUTO-LOG Command Processors 

X-MODEM DISK FILE TRANSFER SUPPORT 

VT-100 & VT-52 TERMINAL EMULATION 

■ No loil data using Hi-R«s Display, Evan at 1200 Baud on the Sariel port. 

■ Hl-Res Oisplays, 2fl to 25S columns by 2s" lines &. true Upper/Lower case. 

* 45K Text Buffer when using the Hi-Res Text Display and Disk . 

* ASCII I. BINARY disk file transfer support via XMODEM. 

■ Directly record receive data to a disk file while online. 

» VT- 1 00 terminal emulation for VAX, UNIX and other systems. 

» VT-1 00/52 cursor keys i position, insert/delete, Pf L All. Kbd. keys. 

* Programmable Word Length, Parity, Slop Bits and baud rates 300 to 0600. 
1 Complete Full and Half Duplex operation, with no garbled data. 

■ Sena full 1 2B character set from Keyboard with control codes. 

* Complete Editor Insert, Delete, Change or Add to Buffer 

* v Variable length, Programmable Macro Key buffers. 

* Programmable Printer rates from I 10 to 0600 Baud. 

« Send Files directly from the Buffer, Macro Key Buffers or Disk. 

* Display on Screen or Print the contents of the Buffer. 

* Freeze Display &, Review information On line with no loss of data. 
1 Built in Command Menu (Help) Display. 

* And much, much more. 

Supports: Word-Pak 1,11, R S and Double Density 80 Column Cards 
Dislo Controller w/80 column card & parallel printer 
PBJ Parallel Printer Card and Dual Serial Port (2SP-Pak) 
R. S. Modem-Pak k Deluxe RS-232 Pak, even with Disk. 

Requires 32K & Disk, Only $59.95 



HI-RES II Screen Commander 

Tired of looking at the 16 line by 32 character display on your 
CoCo? Wish you could see more lines and characters? Then HI-RES II 
is the answer, it can give you the big screen display you've always 
wanted. It will display 24 lines of 32. 42. 5 1 . 64 and even 85 true 
upper and lower case characters per line without exlra hardware. 

HI-RES II is the most powerful screen enhancement package available 
for the Color Computer, yet it is the least expensive. It is completely 
compatible and transparent to Basic. Once the program is loaded, 
everything works the same as before, only you have a much belter 
display to work with. It even allows you to have mixed text and 
Hi-resolution graphics on the same screen or have separate text and 
graphics screens. It also has an adjustable automatic key repeat 
feature and allows you to protect up to 23 lines on the screen. 

HI-RES II features over 30 special control code functions that allow 
you to change characters per line, protect display lines, change 
background color, position cursor, switch normal/reverse video, 
underline, double size characters, erase line/screen/to end of 
screen, home cursor, character highlighl and much more. It works on 
all models of the CoCo with 16, 32 or 64K and provides automatic 
reset control so HI-RES II won't disappear when you press reset. 
Only 24.95 on Tape or $29.95 on Disk 



"The Source" 

Now you can easily Disassemble Color Computer machine language 
programs directly from disk and generate beautiful, Assembler 
Source Code. And "The Source" has all the features and functions you 
are looking for in a Disassembler. 

* Automatic label generation and allows specifying FCB, FCC and FDD areas. 

* Disassembles programs directly from Disk or ROM. 

" Output Disassembled listing with labels lo the Printer, Screen or both 

* Generates Assembler source files directly to disk, or a printed listing. 

* Generated source files are in standard ASCII formal. 

« Built in Hex/ASCII dump/display lo locate FCB, FCC and FDB areas. 

* Built in Disk Directory and Kill file commands. 

* Menu display with single key commands for smooth, Easy operation. 

* Wnlten in fasl machine language, one of the easiest to use Disassemblers 

Requires 32K Disk $34.95 



TEXTPRO III 
"The Advanced Word Processing System" 

* Hi-Res Displays from 2d to 2SS columns by 24 lines & Upper/Lower Case 

■ Three Programmable Header lines that can be re-delined at anytime. 

* Programmable Footer line & Automatic Footnote System. 

■ 10 Programmable Tab slops &. 7 Powerlull Tab Function Commands. 

* Completely Automatic Justification, Centering, Flush left and right. 
" On screen display of underline and Double size characters. 

1 Change indents, margins, line length, etc. parameters anytime in the text. 

* Create and Edit tiles larger than memory, up to the size of a full disk. 
- Easily imbed any number of format and control codes. 

1 Automatic Memory sense 16-64K with up to 46K ol memory workspace. 

■ Fully supports the use of BO column hardware cards. 

TEXTPRO III is an advanced word processing system designed for 
speed, flexabilily and extensive document processing. It is not like 
most of the other word processing programs available for the Color 
Computer. If you are looking for a simple word processor to write 
letters or other short documents, then most likely you'll be belter off 
with one of the other simpler word processors. Bui. if you want a 
powerful word processor with extensive document formatting 
features to handle large documents, term papers, manuals, complex 
formating problems and letter writing, then TEXTPRO III is what your 
looking for. TEXTPRO works in a totally different way than most 
word processing programs. It uses simple 2 character abbreviations 
of words or phrases for commands and formatting information lhat 
you imbed directly in your text. There are over 50 different 
formating commands you can use without ever leaving the text your 
working on. There are no time comsuming. and often furslraling 
menu chases, you are in total control at all times. The formatted 
output can be displayed directly on the screen, showing you exactly 
what your printed document will look like' before a single word is ever 
printed. This includes margins, headers! foolers, page numbers, page 
breaks, underlining, column formating and rull Justification. 

DISK $59.95 TAPE $49.95 



The CBASIC Editor/Compiler VI. 1.2 

Do you want to write fast machine language programs but you 
don't want to spend the next few years trying to learn how ??? 

Well with CBASIC, you could be writing them right now! 
CBASIC is Ihe only fully integrated Basic Compiler and program 
editing system available for the Color Computer It will allow you to 
take full advantage of all Ihe capabilities available in your color 
computer without having to spend years trying to learn assembly 
language programming. CBASIC allows you to create, edit end 
convert programs from a language you are already familiar with 
Extended Disk Color Basic, into fast efficient machine language 
programs easily and quickly. We added advanced features like a full 
blown program editor. Hi-Res text Displays and 80 column hardware 
support for editing, compiling and your compiled programs. Plus we 
made it exceptionally easy to use. CBASIC is Ihe friendliest and 
easiest compiler available for the Color Computer. 

"The most complete Cdit or/Compiler t have seen for the CoCo... " 
—Ihe RAINBOW, Harsh 1066 

CBASIC is a powerful tool for the Beginner as well as the Advanced 
Basic or Machine Language programmer. You can write programs 
without having to worry about the Stack, DP Register, memory 
allocation and so on. because CBASIC will do it for you automatically. 
Or. CBASIC will let you control every aspect of your program, even 
generating machine code directly in a program easily. 

CBASIC features well over 100 compiled Basic Commands and 
Functions that fully support Disk Sequential and Direct access files, 
Tape, Printer and Screen I/O. CBASIC supports ALL the High and Low 
Resolution Graphics, Sound, Play and String Operations available in 
Extended Color Basic, including Graphics GET, PUT, PLAY and DRAW, 
all with 99.955 syntax compatibility. CBASIC also supports the built 
in Serial I/O port with separate printer &. serial I/O baud rates. You 
can send and receive data wilh PRINT. INPUT and INKEY commands. 

CBASIC has its own completely integrated Basic Program Editor 
which allows you lo load, edit or create programs for the compiler. 
It is a full featured editor designed specifically for writing and editing 
Basic programs. IL has block move oi copy, program renumbering, 
automatic line numbers, screen editing, printer control and more 
'The Cditor is a very good one and could be the subject for review 
all by itself. " —The RAINBOW. March 1Mb 

■Comparing CCB's edit mode to CBASIC s text editor is like comparing a 

World War II jeep to a modern sedan Both get you to your destination, 
but what a difference in the ride. — Not Coto. feburary I9M 

The documentation for CBASIC is an 8 1/2 " 11 Spiral Bound book 
which contains approximally 120 pages of real information. 

'CBASIC's manual is easy to read and written with a minimum of 
techmcalese. ' --Hot CoCo February' , 1966 

The price of CBASIC is % 149.00. It is the most expensive Color 
Basic Compiler on the market, and well worth Ihe investment. 
Compare the performance of CBASIC against any Color Basic 
compiler. Dollar for dollar, CBASIC gives you more than any other 
compiler available. Requires 64K 8. Disk, not JDOS compatible. 

'The price tag it carries seemed a bit steep for an integer compiler on first 

glance, but when you add 641.', hi-res drivers, and full-screen editing, CBASIC 

begins to look more like a bargain.. " - - Not CoCo February, I 966 

'A Complete Cdi tor/Compiler Well Worth its Price' —RAINBOW March 1 046 



EDT/ASM 64D 
64K DISK EDITOR ASSEMBLER 

EOT/ ASM 64D is a Disk based co-resident Tex I Editor b. Assembler. 
It has a Hi-Resolution 51. 64 or 85 column by 24 line display, so you 
see your program listings easily and it supporls Column cards. The 
disk also contains a free standing ML Debug Monitor, lo help you debug 
your assembled programs. 

This is the most powerfull. easy to use Text Editor available in any 
Editor/ Assembler package for the Color Computer. II even has 
automatic line number generation for easy entry of program material. 
1 local and Global string search and/or replace. 

■ Full screen line editing with immediate line update. 

* Easy to use Single keystroke editing commands. 

* Load (.Save standard ASCII formatted Tape/Disk files. 

* Move or Copy single & multiple text lines. 

* Create and Edit disk files larger than memory. 

* Hi-Res Text Display 2o to 85 columns by 24 lines. 

* Supports Word-Pak 1 ,11. & R.S. and Dislo 80 column display cards. 
The Assembler portion of EDT/ASM 64D features include: 

a Supports the full 6800 instruction set. 

" Supporls conditional IF/THEN/ELSE assembly. 

1 Supports Disk Library files (include). 

* Supports standard motorola assembler directives 

■ Allows multiple values for FDB (. FCB directives. 

* Generates listings to Hi-Res text screen or printer. 
1 Assembles directly to disk or tape in LOAOM formal. 

* Supports up lo open disk files during assembly. 

* Allows assembly from editor buffer, Disk or both 

Requires 32K Disk $59.95 
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CoCo-3 512K upgrade $149.95. card wihout Ram $49.95 
Two Drive RAM-DISK program for 512K CoCo-3 $19.95 



To order products by mail, send check or money order for the amount of 

!urchase,plus $3.00 for shipping &. handling to the address below 
o order by VISA, MASTERCARD or COD call us at (702) 452-0632 
(Monday Ihru Saturday, Bam lo 5pm PST). 

CER-COMP 

5566 Ricochet Avenue 

Las Vegas, Nevada 891 10 

702-452-0632 



380 ID$=" ITEMS BY TYPE":GOSUB 
7 50 .-PRINT: PRINT -.INPUT" ENTER ITE 
M TYPE TO BE LISTED ";S$:PR 
INT"TYPE";TAB(7) "ITEM" ; TAB (19) "P 
KG", -TAB (25) "DATE": V=0: FOR N=l TO 

B:IF T$(N)=S$THEN390 ELSE 410 
390 PRINTT$(N) ;TAB(7) 1$ (N) ;TAB(1 

9)P(N) ;TAB(24)M$(N)TAB(28) Y(N) ; : 
V=V+1:IF V=12 THEN 400 ELSE 410 
400 INPUT" PRESS enter TO CONTIN 
UE";R$:CLS:V=0 
410 NEXT N 

420 PRINT@448,"<1>=LIST ANOTHER 
TYPE <2>=MENU" 

430 F$=INKEY$:IF F$="" THEN430 
440 IF VAL(F$)=1 THEN380 ELSE IF 

VAL(F$)=2 THEN 200 ELSE 4 20 
450 CLS: ■ DELETE ITEMS 
460 ID$=" DELETE ITEMS" : GOSUB 
7 50 '.PRINT: PRINT" PACKAGE NUMBER 
TO BE DELETED ": INPUT K:FOR X 
=1 TO B:IFK=P(X) THEN 480 
470 NEXT X:GOTO 490 
480 PRINT T$(X); TAB (8) 1$ (X) ; TA 
B(19) "PKG";TAB(21)P(X) ; " IS DEL 
ETED":Y=X:X=B:NEXTX:FOR N=Y TO B 
:T$(N)=T$(N+1) :I$(N)=I$(N+1) :P(N 
)=P(N+1) :M$(N)=M$ (N+l) :Y(N)=Y(N+ 
1) :NEXT N:B=B-l:GOTO 500 
490 PRINT"NO PACKAGE NUM. "K" WA 
S FOUND" 

500 PRINT@448,"<1>=DELETE ANOTHE 
R ITEM <2>=MENU" 

510 F$=INKEY$:IF F$=""THEN510 
520 IF VAL(F$)=1 THEN 450 ELSE 2 

00 

530 ID$=" SAVE DATA ON DISK": GO 
SUB7 50: PRINT: INPUT " DATE OF FIL 
E UPDATE" ; D$ : PRINT : INPUT" DESTINA 
TION DRIVE FOR DATA " ; DN : DRIVE ( D 
N) :OPEN"0", #1, "FREEZER/DAT" : PRIN 
T #1,B 

540 FOR N=l TO B: CLS : PRINT@2 33 , " 
saving data" :PRINT#1,T$ (N) : PRINT 
U,I$(N) :PRINT#1,P(N) :PRINT#1,M$ 
(N) :PRINT#1,Y(N) :NEXTN 
550 PRINT#l,D$:CLOSE#l 
560 ID$=" ALL DONE":GOSUB75 
0: PRINT .-PRINT" DATA HAS BEEN SAV 
ED ON DISK. "-.PRINT: PRINT" PRESS 
ANY KEY FOR MENU .": EXEC4 4539 : GOT 
200 

570 ID$=" LOAD DATA FROM DISK":G 
OSUB7 50: PRINT: INPUT" SOURCE DRIVE 
FOR DATA "; DN : DRIVE (DN) : PRINT: I 
NPUT" PRESS enter WHEN READY" ;R$ 
:OPEN"I", #1, "FREEZER/ DAT": IF EOF 
(1)=-1 THEN 590 

580 INPUT H,B:FOR N=l TO B:ID$ = 
" LOADING DATA FILE" : GOSUB7 50 : P 
RINT@ 2 3 3 , Z $ " 1 oading " Z $ " da t a " Z $ : I 



NPUT #1,T$(N) :INPUT#1,I$(N) : INPU 
T#1,P(N) :INPUT#1,M$(N) :INPUT#1,Y 
(N) :NEXT N:INPUT #1,D$ 
590 CLOSE #1:GOTO200 
600 ID$=" PRINT BY CATEGORY": GO 
SUB7 50: PRINT: PRINT " PRINT OF FR 
EEZER CONTENTS BY CATEGORY" :P 
RINT: INPUT" INPUT TODAYS DATE";E 
S:PRINT#-2,CHR$(27)CHR$(87)CHR$( 
1) :PRINT#-2,CHR$ (27)CHR$(45)CHR$ 

(1) 

610 PRINT#-2, "CONTENTS OF FREEZE 

R":PRINT#-2,"AS OF: ";E$:F$(1)=" 

BEEF" : F$ ( 2 ) ="PORK" : F$ ( 3 ) ="CHICK" 

:F$(4)="FISH" : F$ (5) ="MISC" 

620 FOR J=l TO 5:PRINT#-2:PRINT# 

-2 , CHR$ (27) CHR$ (87) CHR$ (1) : PRINT 

# -2 , CHR$ ( 27 ) CHR$ (45) CHR$ ( 1 ) : PRIN 

T#-2 , F$ ( J) : PRINT#-2 , CHR$ ( 27 ) CHR$ 

(87)CHR$(0) ; :PRINT#-2,CHR$(27)CH 

R$(45)CHR$(0) ; 

630 FORX=lTO 18 : PRINT#-2 , CHR$ (23 

1) ;CHR$(2 32) ; :NEXTX: PRINT#-2 : FOR 

N=l TO B 
640 IF T$(N)=F$(J) THEN 650 ELSE 

660 
650 PRINT#-2,I$(N) ;TAB (23 ) P (N) ;T 
AB(30)M$(N) ;TAB(33)Y(N) 
660 NEXT N:NEXT J : PRINT #-2 : PRINT 
#-2,STRING$(40,45) : PRINT: INPUT " 

WHAT IS THE NEXT PACKAGE NO";U: 
PRINT #-2," NEXT PACKAGE NO IS " ; 
U:PRINT#-2,STRING$(12,10) : PRINT: 
PRINT" PRESS enter TO RETURN TO M 
ENU":EXEC44539:GOTO 200 
670 ID$=" SEARCH FOR ITEM" : GOSU 
B750: PRINT: INPUT" NAME OF ITEM Y 
OU ARE SEARCHING FOR" ;S$ : P=l: C= 
0:V=0:FOR N=l TO B: F=INSTR(P, 1$ ( 
N),S$):IF F=0 THEN 700 
680 PRINT T$(N) ;TAB(8)I$(N) ;TAB( 
25)P(N) :C=C+l:V=V+l:IF V=12 THEN 

690ELSE700 
690 INPUT" PRESS enter TO CONTI 
NUE";R$:V=0:CLS 

700 NEXT N:IF C=0 THEN PRINT : PRI 
NT" NO ITEM CALLED " ; S$ ; " FOUN 
D" 

710 PRINT@448, "<1>=SEARCH AGAIN 
<2>= MENU" 

720 F$=INKEY$:IF F$=" "THEN720 
730 IF VAL(F$)=1 THEN670 ELSE IF 

VAL(F$)=2 THEN 200 ELSE 710 
740 PCLEAR1:GOTO150 

750 CLS :PRINT§0, STRINGS (6, 175) ; : 
PRINT@ 6 , ID$ ; : PRINT@2 6 , STRINGS ( 6 , 
17 5) ; :PRINT@3 2,STRING$(3 2,134) ; : 
ID$="": RETURN 
7 60 CLS: PRINT: PRINT" ARE YOU SURE 

? y/n": PRINT: INPUT R$:IF R$="Y" 
THEN ID$=" HAVE A NICE DAY":GOS 
UB750: END: ELSE GOTO 200 
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TURBO RAM 



TM $3*935 
$11.9.95 



TURBO CHARGE YOUR COCO 3 



V 512K Fasl High Quality Memory. 

i-" Super Easy Solderless Installation. Installs in minutes. 

I-" Assembled, tested, and burned-in. 

v* 120 ns RAM Chips 

l* High Quality Double Sided, Solder Masked, Silkscreened PC Board. 

\* Ideal lor OS9 Level II 

C 2 Year Warranty. 

* Free CIME Chip Technical Specs ($10.00 without Turbo Ram). 

V Free 5I2K Ram Test Program ($10.00 without Turbo Ram). 
W Free MUSICA RAM Disk ($10.00 without Turbo Ram). 

V $5 OFF TURBO RAM Disk. 

f Also available, TURBO RAM less memory chips $69.95 



INSTALLATION 

li you know how to hold a screwdriver, we're convinced you can 
install Turbo Ram in minutes. However, it you like, send us your 
COCO 3 insured, postage paid, and we will install it, pay the return 
postage and guarantee it lor I year $15.00 





SATISFACTION GUARANTEED 

It lor any reason you wish to return Turbo Ram, you may do so 
wilhin 1 5 days and be charged only a 107u restocking charge. You 
may keep the CIME CHIP Technical Specs, 512K Ram Test program 
and MUSICA RAM DISK, a $30 value. 



TURBO RAM DISK adds 2 lighlning last Ram Disks to your COCO system. 
Imagine saving and loading programs instantaneously and having hundreds 
of your programs "on line" tor last access. Single disk system users can 



TURBO RAM DISK 



use TURBO RAM DISK to easily make backups without continuously 
switching disks. 

Requires 5I2K Turbo Charged COCO 3 $24.95 

When purchased with TURBO RAM $19.95 



COCO 3 128K 



COLOR CONNECTION IV 

This is the most comprehensive modem package for the COCO 3. All 
standard protocols are supported including CompuServe's Protocol B, 
XMODEM protocol, and XON/XOFF. Full supporl of the auto answer/aulo 
dial feature for both Hayes compatible and some Radio Shack modems is 
provided. Single key macros allow easy entry of often-used passwords and 
ID's with a single key stroke. 
Disk $49.95 

COLOR SCRIBE III 

This great Word Processor can lake full advantage of the 80 column display 
of the COCO 3. Justification, Headers, Footers, and Pagination make it 
perfect for letters and documents as well as programming in BASIC, PAS- 
CAL, "C," and Assembly Language. Over 20 line editing commands include 
capabilities like character insert and delete, skip over words, breaking a 
line, and more! 
Disk $49.95 



THE MAGIC OF ZANTH 

In the Land of Zanth, magic is commonplace. Dragons, Griffins, Centaurs 
and Demons abound. You are sent on a quest to discover the source of 
magic in ihe Land of Zanlh. This intriguing adventure fealures over 2 
dozen hi-res 16 color animated graphic screens, 4 voice music and sound 
effects. The 16 color, 320 x 192 graphics look great. 
Disk $34.95 

RETURN OF JUNIOR'S REVENGE 

This is the same lunior you've seen in the Kong arcade series, but with 
new COCO 3 graphics. This tireless little monkey must overcome all sorts 
of obstacles (4 screens worth) to rescue his father, The King, from the 
mean zookeeper. He will traverse the jungle and swamp, climb vines, 
avoid chompers and birds, open locks, and more before he finally meets 
with his big daddy. The 16 color, 320 x 192 graphics are superb. 
Disk $34.95 



We accept CASH, CHECK, COD, VISA anil MASTER CARD orders 
Sltippinu and lundlinK US and Canada S HXI 

Shipping and handling outside ihe Us and I anada . 55.00 

COD CliaiKe il.00 

Illinois residents add b'/."l. sales lax. 
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38W255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 
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FILE EDIT MIDI MISC. 



fill Voices Dn 
Tine Signature 



LEGE 



Key Signature 
Tempo 
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LYRA is the mosl powerful music composilion program we have seen on 
any computer. We don't mean just the COCO, we really mean any com- 
puter. Whether you are a novice trying to learn music or a professional 
musician with MIDI equipment you will find LYRA a powerful tool. You 



see, we wrote LYRA for musicians that hate computers. If you want proof, 
purchase a LYRA demo for $7.95. We will apply the demo price to your 
purchase. MIDI output requires the LYRA MIDI cable (#MC158I or COCO 
MIDI Seq/Edilor (#CM147). 



Ultra Easy to use, |ust point with joystick or 

mouse and click. 

Compose with up to 8 completely 

independent voices. 

Room lor over 18,000 notes. (This is nol a 

misprintl) 

Super Simple Editing Supports: 



Note insert 
Note delete 
Note change 
Output music to: 
TV Speaker 
STEREO PAK 
SYMPHONY 12 
MIDI Synth 



Block insert 
Block delete 
Block copy 

Monitor Speaker 
ORCHESTRA 90 
COCO MIDI S/E 
MIDI Drum Machine 






Output up to 4 voices without additional 
hardware. 



Output all 8 voices using either SYMPHONY 

12 or one or more MIDI synthesizers and 

drum machines. 

Output any voice on any ol the 8 MIDI 

channels. 

Transpose music to any key. 

Modify music to any tempo. 

Automatically inserts bar lor each measure 

as you compose. 

Key signature lets you specify sharps and 

flats only once, LYRA will do the rest. 

Plays MUSICA 2 files using LYRA CONVERT 

(#LC164). 

Each voice may be visually highlighted or 

erased. 

Each measure is numbered for easy 

reading. 



v Solo capability 

* Block edits are highlighted. 

v* Tie notes together for musical continuity. 

f* Name of note pointed to is constantly 

displayed, 
n" Jump to any point in the score 

instantaneously, 
i^ Memory remaining clearly displayed, 

however you will have plenty of memory 

even for the most demanding piece. 
p-« Help menu makes manual virtually 

unnecessary. 
i^ LYRA is 100% software, no need for extra 

hardware unless you want more power. 
\^ Music easily saved to tape or disk. 
\* Requires 64K and mouse or joystick. 
LYRA (Disk only) #LY122 $54.95 



LYRA OPTIONS 



These LYRA options are nol required. They are provided for those wishing additional flexibility. 



LYRA CONVERT 

A program to convert MUSICA 2 files to LYRA 

files. 

(T or D) #LCI64 $14.95 

LYRA STEREO ENHANCER 
Gives the LYRA stereo output when used with 
the STEREO PAK or ORCHESTRA 90. 
(T or D) #LSI49 $14.95 

LYRA MIDI CABLE 

A cable to connect your computer to your MIDI 

synthesizer. 

#MC158 $19.95 

We accept CASH, CHECK. COD. VISA and MASTER CARD orders. 

Shipping and handling US and Canada $3.00 

Shipping ,ind handling outside (he US and Canada $5.00 

COD Charge S2.00 

Illinois residents add 6'/.°.;, sales Ian. 



LYRA SYMPHONY 12 ENHANCER 
Lets LYRA play all 8 voices through SYMPHONY 
12. 
(T or Dl #LS177 $19.95 

STEREO PAK 

Plugs into the COCO ROM cartridge slot allow- 
ing easy connection to your stereo system. 
#SPI93 $:19.95 

SYMPHONY 12 

A real hardware music synthesizer, lets LYRA 

play all 8 voices in stereo. 

(T or D) #SY149 $69.95 



COCO MID Seq/Edilor 

A professional quality MIDI interface for MIDI 

synthesizers. 

(Disk onlyl #CM147 $149.95 

MUSIC LIBRARY 

A collection ol over 800 songs. When used with 
CONVERT, it gives an incredible LYRA library. 
Each volume 100 songs. 
(T or D) #MLXXX $29.95 

COCO MAX is j trademark of Colorware. 
ORCHESTRA 90 h a trademark of Radio Shack. 
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BATAVIA, ILLINOIS 60510 

(312) 879-6880 
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HIDI Instrunents: 

0:[i]01 Brass 1:005 String 

M 2: 006 Piano 3:003 Guitar 

i 4: 013 E Organ 5: 014 P Drgan 

6=003 Trumpet 7:016 Flute 

8:018 Dboe 9:013 Clarnet 

A: 021 Vibrphn B: 026 Harpsch 

C:025 Clavier D:032 Tinpani 

E: 043 Snaredr F: 045 Percusn 
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Now your COCO can talk lo your MIDI music synthesizer. 
Whether you have a Korg, Roland, Casio, Yamaha, or Moog, it 
doesn't matter as long as it's MIDI equipped. Choose from our 



v Supports 16 Track recording and playback. 

i-** Ad|uslable tempo. 

«* Over 45 Kbytes available 

(Over 15.500 MIDI events possible) 

f Record to any track 

f Low Level Irack editing. 

v* LYRA editing, (one voice per track) 

v* Playback from any number ot tracks. 

& Quantizing to Vi6. 'Ae, Vfei intervals 



Filter out MIDI dala: 
Key pressure 
Program change 
Pitch wheel 



entry level MUSICA MIDI system that plays MUSICA files or our 
Professional COCO MIDI 2 system. 



Control Change 
Channel Pressure 
System Message 



v Graphic Piano Keyboard Display in both 
record and playback mode. 

w Ad|ustable Key (Transposition) 

i-" Save recording to disk lor later playback or 
editing. 

i--* Syncs lo drum machine as MASTER or 
SLAVE 



v* Sequencer features. 

<■" 100% machine code. 

i* "Musician Friendly" Menu Driven. 

v* Metronome 

i* Many songs included. 
Includes MIDI hardware interface, 2 MIDI ca- 
bles, detailed manual, and software. Requires 
64K CoCo, Y-Cable or Mulli-Pak. 
COCO MIDI 2 (disk only) #CM147 . $149.95 

DOUBLE Y-CABLE #DY181 $28.95 

TRIPLE Y-CABLE #TY173 $34.95 



Save and load voice parameters for the Yamaha DX series of syn- 
thesizers (DX-7, DX-100, DX-21 etc.). Save sounds individually 
or as a group letting you load the entire synthesizer in seconds. 



DX LIBRARIAN 



TM 



Comes with professionally developed voices for the DX-7 worth 
10 times the price. Requires COCO MIDI hardware interface. 
DX LIBRARIAN (Disk only) #DX143 $39.95 



CASIO LIBRARIAN 



Save and load voice parameters for any Casio synthesizer (CZ-101, 
CZ-1000, CZ-5000 etc.) You can save from the: presets, cartridge, 



memory or buffer. Requires COCO MIDI hardware interface. 
CASIO LIBRARIAN (Disk only) #CL169 $39.95 



MUSICA MIDI 



TM 



MUSICA MIDI takes any MUSICA 2 music file and plays it through 
your MIDI synthesizer. We offer you over 800 tunes from our 
MUSIC LIBRARY series (sold separately) or create your own music 



using MUSICA 2. Inlcudes: documentation, plenty of music, and 
the cable to connect between the COCO and your synthesizer. 
MUSICA MIDI Complete (Disk Only) #CM126 $39.95 



MIDI KEYBOARD 



If you own the Casio CZ-101 or similar MIDI synth, you know 
that the mini keys and the short 3 or 4 octave keyboard is limiting. 
MIDI KEYBOARD when used with our full size 5 octave keyboard 



gives you the flexibility you need. Comes with cable to connect 

the COCO to your MIDI synth. 

MIDI KEYBOARD (Disk only) #MK167 $29.95 




EARS 



Electronic 
Audio 
Recognition 
System 



$99.95 



• SPEECH 
RECOGNITION 

• HANDS OFF 
PROGRAMMING 

•HIGH 
QUALITY 
SPEECH 
REPRODUCTION 

EARS Does It All! 
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Two Years In Ihe Making. Speech Systems 
was formed to develop new and innova- 
tive speech products. After 2 years of in- 
tensive Research and Development, we 
have created a truely sophisticated 
speech recognition device. Recognition 
rates from 95% to 98% are typical. Until 
now, such a product was outside the 
price range of the personnel computer 
market, and even small businesses. 

EARS is trained by your voice and capable 
of recognizing any word or phrase. 
Training EARS to your particular voice 
print takes seconds. Up to 64 voice prints 
may be loaded into memory. You may 
then save on tape or disk as many as you 
like so that your total vocabulary is virtu- 
ally infinite. 

Speech and Sound Recognition. EARS is re- 
ally a sound recognition system, so it re- 
ally doesn't matter whether you speak in 
English, Spanish, or French. In fact you do 
not have to speak at all, you can train 
EARS to understand sounds such as a 
musical note or a door slamming. 

Hands Off Programming. Imagine writing 
your own BASIC programs without ever 
touching the keyboard. Everything that 




you would normally do through a 
keyboard can now be done by just 
speaking. 

Programming EARS Is Easy. LISTEN, 
MATCH and other commands have been 
added to BASIC so that programming 
EARS is a piece of cake! The single BASIC 
line: 10 LISTEN: MATCH will instruct 
EARS to listen to you and return the 
matching phrase. 

II Talks. EARS is also capable of high qual- 
ity speech. We mean REALLY high quality. 
The speech is a fixed vocabulary spoken 
by a professional announcer. Speech 
Systems is currently creating a library of 
thousands of high quality words and 
phrases. For a demonstration call (312) 
879-6844, you won't believe your ears or 
our EARS. 

DISK OWNERS. EARS will work with any 
disk system with either a MULTI-PAK or 
Y-CABLE. Our new Triple Y-CABLE was 
specifically developed for those wishing 
to add SUPER VOICE as a third device. 

You Get Everything You Need. You get ev- 
erything you need including a specially 
designed professional headset style noise 



cancelling microphone. The manual is 
easy to use and understand. Several 
demonstration examples are included so 
you don't have to write your own pro- 
grams unless you want to. EARS will work 
in any 32K or 64K Color Computer. 

SUPER VOICE $20 OFF 

Imagine talking to your computer and it 
talking back to you. When you need an 
unlimited vocabulary, you can't beat 
SUPER VOICE. For a limited time, we will 
give you the SUPER VOICE for $59.95 with 
your EARS purchase. Even if you already 
have another speech unit, here is your 
chance to buy the best and save $20. 

VOICE CONTROL 

Applications for EARS are astounding. 
Here is our first of many listening pro- 
grams to come. VOICE CONTROL is a 
program specifically designed to allow 
you to control any appliance in your 
house with your voice and our HOME 
COMMANDER (sold separately) or the 
Radio Shack Plug 'N' Power controller. 
For example, you can control your TV by 
saying "TV ON" or "TV OFF". . $24.95 
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Dealer Inquiries 
Invited 
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We accept CASH, CHECK, COD, VISA and MASTER CARD orders. 

Shipping and handling US and Canada $3.00 

Shipping and handling outside the US and Canada $5.00 

COD charge $2.00 

Illinois residents add 6'A% sales tax 



Speech S^uiti 

38W255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 (TO ORDER) 



CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL 



'SUPER VOICE' 



COCO'S MOST ADVANCED 
SPEECH SYNTHESIZER. 

IT TALKS, SINGS AND 

MORE. 

only . . . $79.95 



WITH EARS PURCHASE 
only . . . $59.95 



SUPER VOICE is no ordinary speech synthesizer. It uses Silicon 
Systems, Inc. SSI-263, the most advanced speech/sound chip 
available. SUPER VOICE is not only capable ot highly intelligible 
speech, sound effects, and singing over a 6 octave range, but now 
we have turned SUPER VOICE into a monophonic Super Music 
Synthesizer with our PIANO KEYBOARD. 

IT TALKS. A free TRANSLATOR text-to-speech program makes 
writing your own talking program as easy as SAYING "HELLO." 

SUPER VOICE works in any 32K or 64K computer. A disk system 
requires a Y-Cable or Multi-Pak. 







Here are the facts; 
the decision is yours. 









1 REAL TALKER 


RS SPEECH 
CARTRIDGE 


VOICE-PAK 


Synthesizer Device 


SC-01 


SP-258 


SC-01 


Speaking Speeds 


t 






Volume Levels 
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Articulation Rates 


1 


1 




Vocal Tracl 
Filler Settings 


' 


1 




Basic unit 
ol Speech 


I 64 phonemes 
i <uianuni aicn 


64 allophones 
5 pause lengths 


64 phonemes 


Pilch. Variations 
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SUPER TALKING HEADS 

Paul and Pauline, our talking heads program is normally $24.95. Until 
Dec. 15 we will include them with each SUPER VOICE order. 
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NO FREE 

,5^ BUNK DISK 

^ OR TAPE 
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-£, ORDER 
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Dealer Inquiries 
Invited 
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Speech S^ifst 



We accept CASH, CHECK, COD, VISA and MASTER CARD orders. 

Shipping and handling US and Canada $3.00 

Shipping and handling outside the US and Canada $5.00 

COD charge $2.00 

Illinois residents add 6V«% sales tax 
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38W255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 (TO ORDER) 



1 MEGABYTE 
COLORAMA 

CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL OR BBS. 
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A Flexible Program for 



Teaching Line Graphs 

By Steve Blyn 



Rainbow Contributing Editor 






Graphs are one of the more inter- 
esting yet often confusing topics 
in mathematics. They appear in 
many of the standardized math tests 
that youngsters are required to take. 
Graphs are an important part of any 
consumer's education. Newspapers, 
especially, contain many examples of all 
types of graphs that should be studied 
and understood. 

This program is an aid in learning to 
understand line graphs. The program 
will generate endless line graphs for you 
to use as you see fit. The last line in the 
program will permit you to save any of 
the graphs on your disk system. You 
may also print out any graphs generated 
if you have a screen print program. 

Although several of the values are 
given after each graph has been drawn, 
there are no formal questions asked by 
this program. The reason for this is 
there are just too many different levels 
that your child or pupils may be on. 

Examples of questions for younger 
students might be: 

1) What is the value of each of the 
variables? 

2) Which is the greatest value? 

3) Which is the smallest value? 
Examples of questions for middle 

grade students might be: 



Sieve Blyn teaches both exceptional 
and gifted children, holds two master's 
degrees and has won awards for the 
design of programs to aid the handi- 
capped. He owns Computer Island and 
lives in Stolen Island, New York. 
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1) What is the difference between the 
highest and the lowest values? 

2) Which is the second highest or sec- 
ond lowest value? 

3) Arrange the values in ascending or 
descending order. 

Examples of questions for older 
students might be: 

1) What is the mean? 

2) What is the median value? 

3) Any other statistical operation you 
desire to teach or test. 

Lines 50 through 90 contain the 
program's opening screen. The user 
may either press ENTER to see a graph 
or press E to end the program. After 
pressing ENTER, lines 120 through 460 
will draw a graph. All of the variables 
will be in multiples of five to make 
computing the values easier for all 
students. The values will be random. No 
graphs will be identical. 

Lines 200 through 240 ensure that no 
two scores will be the same. This was 
done so that questions such as, "Which 
is the largest value?" have only one 
answer. If this does not suit your pur- 
poses, then merely shorten these lines to 
remove the IF statements. You will then 
randomly have repeats in the variables' 
values. 

Lines 500 through 640 contain the 
strings to draw the numbers and letters. 
The numbers one through seven are 
needed for the value amounts zero to 70 
and the letters A though F are used as 
the variable names. 

After the graph is drawn, the child 
may answer any of your questions. 
When the ENTER key is pressed, the 



computer will display the amount of 
each variable and the average (mean) of 
the scores. These values may be com- 
puted by the children while the graph is 
still displayed. These values can be used 
as questions to be answered if you 
choose not to make up any of your own 
questions or if the child is using the 
computer alone at this time. 

You are therefore free to have the 
child answer the questions that the 
computer suggests through the list of 
graph data, or answer any preset ques- 
tions of your own design. Lines 680 
through 730 compute the value of each 
of the variables. A2 to F2 are the 
amounts of the variables. "AV" is the 
average of them. Please feel free to use 
these variables to help alter this pro- 
gram to suit the needs of your children. 

If you are using a disk drive on your 
CoCo system, any of the graphs may be 
saved to your disk. The time to save the 
picture is while it is still being displayed 
on the screen. Press the S key and this 
graph will be saved as GRAPH1.BIN. If 
you want to save more graphs, you must 
change the name of the next graph so 
it does not overwrite the first one. 
Change the name in Line 850 to GRAPH2 
and the next to GRAPH3, and so on. 

If you want to view any of yourgraph 
pictures in the future, merely enter the 
following program: 

10 PCLS5:PM0DEI 3, IrSCREEN 1, 1 
20 LORDM'-GRflPHl.BIN" 
30 GOTO 30 

Then type RUN. 



Almost any screen print program will 
be able to give you a hard copy of these 



graphs. We hope you and your children 
enjoy working with line graphs. We at 



Computer Island always enjoy hearing 
from our readers. □ 



The listing: GRAPHS 



10 REM"LINEGRAPHS" 

20 REM"STEVE BLYN , COMPUTER ISLAN 

D,STATEN ISLAND, NY, 1987" 

30 CLEAR2000 

40 GOSUB 500 

50 CLS: PRINTS 11," LINEGRAPHS"; 

60 PRINT§9 6,"PRESS ENTER TO SEE 

SEE THE GRAPH 

AND PRESS ENTER AGA 

IN TO RETURN . " 

70 PRINT@160,"AND PRESS ENTER AG 

AIN TO RETURN . " 

80 PRINT@40,STRING$ (16,255) ; 

90 PRINT@4 19, "PRESS THE 'E 1 KEY 

TO END"; 

100 EN$=INKEY$ 

110 IF EN$=CHR$(13) THEN 120 ELS 

E IF EN$="E" THEN 830 ELSE 100 

120 PCLS5:SCREEN1,1:PM0DE3,1:CIR 

CLE (90, 90) ,10 

130 PCLS5:SCREENl,l:PMODE3,l:COL 

OR7 

140 LINE(25,170)-(240,172) ,PSET, 

BF 

LINE(25,15)-(27,170) ,PSET,BF 
COLOR8:FOR T=30 TO 150 STEP 



150 

160 

20 

170 

180 

190 

200 

=A1 



LINE(27,T)-(235,T) , PSET 
NEXT T 

A=40:A1=(3+RND(12) ) *10 
B=75:B1=(3+RND(12) ) *10:IF 
THEN 190 



Bl 



Hint . . . 

Rainbow Check PLUS Fix 

If you are using a Word Pak I or // under Disk 

BASIC (EPROM version), you can also use the 

Rainbow Check PLUS. However, in order to get 

the checksum displayed, you must press the space 

bar before pressing the down arrow key. This is 

because of the full screen editor in the Word Pak. 

If you just pressed the down arrow key, the cursor 

would simply move down one line. But, this only 

occurs if the down arrow key is pressed as the first 

character on a line. By pressing the space bar, you 

eliminate this problem. _ 

Greg Law 

(GREGL) 

Columbus, GA 



210 C=110:C1=(3+RND(12) ) *10:IF C 

1=A1 OR C1=B1 THEN 190 

220 D=145:D1=(3+RND(12))*10:IF D 

1=A1 OR D1=B1 OR D1=C1 THEN 190 

230 E=180:E1=(3+RND(12) )*10:IF E 

1=D1 OR E1=C1 OR E1=B1 OR E1=A1 

THEN 190 

240 F=215:F1=(3+RND(12) )*10:IF F 

1=A1 OR F1=B1 OR F1=C1 OR F1=D1 

OR F1=E1 THEN 190 

250 COLOR8 

260 CIRCLE (A, Al) , 2 

270 CIRCLE (B,B1) ,2 

280 CIRCLE(C,C1) ,2 

290 CIRCLE (D,D1) ,2 

300 CIRCLE(E,E1) ,2 

310 CIRCLE (F,F1) ,2 

320 COLOR6:LINE(A,Al)-(B,Bl) , PSE 

T 

330 LINE- (C, CI) , PSET 

340 LINE- (D, Dl) , PSET 

350 LINE-(E,E1) ,PSET 

360 LINE-(F,F1) ,PSET 

370 DRAW"BM45,175;C7A2S12"+A$+SP 

$+B$+SP$+C$+SP$ 

380 DRAW D$+SP$+E$+SP$+F$ 

390 DRAW"BM6,22;C8S8"+Z7$+0$ 

400 DRAW"BM6,42"+Z6$+0$ 



One-Liner Contest Winner . . . 



Payout will compute your monthly payments on any 
loan based on the loan amount, interest rate and period 
of the loan. 

The listing: 

10 CLS: INPUT "AMOUNT FINANCED" ; A: 
INPUT "INTEREST RATE" ; I : INPUT "MON 
THS FINANCED" ;M: P=A*I/1200/ (1-1/ 
((1+(I/1200) ) A M) ) :R=P*100:S=FIX 
(R) :V=S/ 100: PRINT "MONTHLY PAYMEN 
TS";V 



Rick A. Walter 
EielsonAFB, AK 

(For this winning onc-lincr conicsl cnlry, the author has been sent copies of 
both The Second Rainbow Book of Simulations and its companion The Second 
Rainbow Simulations Tape.) 
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410 DRAW"BM6,62"+Z5$+0$ 
420 DRAW"BM6,82"+Z4$+0$ 
430 DRAWBM6, lp2" + Z3$+0$ 
440 DRAW"BM6,122"+Z2$+0$ 
450 DRAW"BM6,142"+Zl$+0$ 

460 DRAW"BM20,162"+O$ 

470 EN$=INKEY$ 

480 IF EN$=CHR$(13) THEN 670 ELS 

E IF EN$= ,I S" THEN 850 ELSE 470 

4 90 REM" THE STRINGS FOR THE LETT 

ERS AND NUMBERS FOLLOW" 

500 A$="BEHUNU2R4NU2DGL2BGBL6" 

510 B$="BEHENR3HER3D4L3BGBL6" 

520 C$="BU4ER2FD2GL2HBG2BL4" 

530 D$="BEHU2ER3D4L3BGBL6" 

540 E$="BER3U2NL2U2L4BG5BL2" 

550 F$="BUR4U2NL3U2BG5BL5" 

560 0$="BEHU2ER2FD2GL2BGBL6" 

570 Z1$="BE2NU3DEBFBGBL9" 

580 Z2$="BENR3HER3U2L4BG5BL" 

590 Z3$="BENR3HENR2HER3BG5BL5" 

600 Z4$="BENU4E3L4BG4BL2" 

610 Z5$= M BER4U2L3HER3BG5BL5" 

620 Z6$="BU2FR2EU2NHGL2HER2BG5BL 

4" 

630 Z7$="BUNR4UE3BG5BL4" 

640 SP$="BE4BUBG5BL5"' ***SPACER 



650 RETURN 

660 REM" COMPUTE AND PRINT THE AN 

SWERS" 

670 CLS: PRINT" HERE ARE THE 

RESULTS": PRINT 

680 A2=(-Al/2)+85 

690 B2=(-Bl/2)+85 

700 C2=(-Cl/2)+85 

710 D2=(-Dl/2)+85 

720 E2=(-El/2)+85 

730 F2=(-Fl/2)+85 

740 PRINT"A="A2, "B="B2 

750 PRINT"C="C2 / "D="D2 

760 PRINT"E="E2,"F="F2 

770 AV=(A2+B2+C2+D2+E2+F2)/6 

780 AV=INT(AV+.5) 

790 PRINT@229,"THE AVERAGE WAS " 

AV 

800 PRINT@456, "PRESS G TO GO ON. 

ii • 
i 

810 EN$=INKEY$ 

820 IF EN$="G" THEN RUN ELSE 810 

830 CLS: END 

840 REM" SAVING THE PICTURE OF TH 

E GRAPH" 

850 SAVEM"GRAPH1", 3584, 9727, 3584 

:GOTO 670 



/R\ 



From the Princeton RAINBOWfest . . . 

The CoCo 3 Round-Table Tape! 



YES. Please send me 



copies of the "CoCo 



3 Round-Table Tape" at $5 per copy plus $1.50 

S/H for a total of . 

(U.S. Currency only, please.) 



Name (please print 

Address 

City 



State 



Telephone 
Company_ 



ZIP 



□ Payment Enclosed, or Charge to: 

D VISA D MasterCard □ American Express 

Account Number 

Exp. Date 

Signature 



Make checks payable to The Rainbow. Mail to CoCo 3 
Round-Table Tape, The Rainbow, P.O. Box 385, Pros- 
pect, KY 40059. To place credit card orders, call our toll- 
free number: (800) 847-0309. 



the rainbow recorded the main event 
of RAINBOWfest Princeton, the Satur- 
day evening (Oct. 18) round-table 
discussion: 

"The Design, Development 
and Marketing of the CoCo 3." 

Speakers included Tandy's Barry 
Thompson and Mark Siegel, as 
well as independent CoCo 3 pro- 
grammers Steve Bjork and Dale Lear 
(filling in for Greg Zumwalt). 

This was a lively and informative ses- 
sion and, therefore, we want as many 
people as possible to hear what these 
RAINBOWfest guests had to say. 
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Also from the Rainbow makers . . . 



SOFT 
SECTOR 



The PC Compatible Magazine. 




Not long ago, the al- 
phabet of the world of MS- 
DOS computers was domi- 
nated by only three letters: 
I, B, M. We saw them every- 
where. They stood for a 
great standard in personal 
computers, but they also 
spelled something else: 
high prices and a conserva- 
tive lack of innovation. 

Today things have 
changed. With Tandy, Com- 
paq, ALR, Leading Edge, 
Victor and dozens of others, 
the list of PC Compatibles 
stretches from A to Z. With 
lower prices and improved 
performance, these are the 



machines that have truly 
made the PC a "personal" 
computer. 

Yet, when the owner of a 
PC Compatible turns to a 
magazine for information, 
all they see are those same 
three letters again! But no 
more! 

Now there is SOFT SEC- 
TOR, The PC Compatible 
magazine. Each and every 



month of the year, SOFT 
SECTOR offers information 
and programs written just 
for the PC Compatibles. 

Each issue of SOFT SEC- 
TOR brings you: 

• Interesting, informative 
features on the ever- 
changing world of per- 
sonal computers, with a 
look at the latest in the 
growing line of MS-DOS, 
PC Compatibles. 

• In-depth product reviews 
to help you sort through 
the confusing assortment 
of hardware and soft- 
ware. 

• Useful, practical hints 
and tips to help you get 
the most from your com- 
puter with the least frus- 
tration. 

• A wealth of programs 
that can be typed in and 
run on your computer: 
utilities, home and busi- 
ness applications, games 
and graphics. And a com- 
panion disk service 



(available separately) for 
those who simply don't 
have the time to type 
those great programs in. 
A spotlight on the best 
product of the month, 
chosen by our editors as 
the most useful, the most 
innovative, and the one 
you should seriously 
consider adding to your 
collection. 



Subscribe now for only $18 — 

50 percent off 

the newsstand price! 



For a limited time, sub- 
scriptions for a full year of 
SOFT SECTOR are only 
$18. So don't wait! Sub- 
scribe today and begin to 
learn how to release the full 
potential of your PC Com- 
patible. 



Yes! Sign me up lor a one year subscription lo SOFT SECTOR. The PC | 
Companble Magazine. Al only S18' lor 12 issues, that's a savings ol 50% 
oil the newsstand price! Special otler ends March 15. 1987 - , 

ADDRESS > """"^ 



□ Payment Enclosed (payment must accompany order) 
Charge: □ VISA D Master Card □ American Express 



Card Expiration Date 



■Subscriptions to SOFT SECTOR are $18 in the United States; U.S. $30 in Canada. 
Surface rate to other countries is U.S. $54; air rate, U.S. $75. Allow 6-8 weeks tor 
lirst copy. Subscription begins with next available issue. U.S. funds only, please. 
In order to hold down non-editoriat costs, we do not bill. _. . __ 

TO: SOFT SECTOH, The Fatiotl Bldg., P.O. Boi 385, Proipacl. KY 40059 H4o7 
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Screen Star 



New Screen Editor 
with Smart Speller! 

This is the screen editor everyone has been waiting for! 
Screen Star is clearly the most powerful editing product 
ever available on the Color Computer. 

WordStar Implementation 

What makes it so powerful? Screen Star implements the 
popular WordStar editing capabilities. If you know or use 
WordStar on any other computer, you already know how 
to use Screen Star on your CoCo! Plus, what you learn with 
Screen Star you can use on nearly any other computer 
you use later. 
Edit Files Larger than Memory 

Since Screen Star uses the disk as an extension of 
memory, it will edit files larger than memory. You are not 
confined to small text or program filesl 
Block Commands 

With a keystroke you can mark the start and end of a 
block, then move, copy, or delete the block with another 
keystroke. 
Cursor Movement 

An array of powerful cursor commands help you to 
move left or right one character, or one word, or one line; 
scroll forward or back one line, one screen, one block; 
jump to the start or end of the line or the screen, block or 
file. 
Find & Find/Replace Commands 

Full implementation of find and find/replace com- 
mands make mass changes and searches a snap. This is 
so time saving when programming or word processing! 



Parameter Commands 

Personalize your editing environment using the para- 
menter commands. Set tabs, toggle the video, access 
the OS-9 Shell, and choose wordwrap. CoCo 3 users can 
define up to 10 functions keys for fast, repetitive functions. 
Pop-Up Help Menus 

Help is as close as a keystroke. At any time you can 
bring up a concise list of commands and functions to 
help you use Screen Star's full capabilities. 

Closing Commands 

Not only can you exit the editor with or without save, 
but you can import or export files whenever you need 
them. 
Smart Speller Included 

Smart Speller is included in the package too! This is a 
revolutionary new idea in spelling checker programs. 
Unlike most spelling checkers which require a huge dic- 
tionary file containing every word you ever wish to use. 
Smart Speller utilizes a relatively small dictionary which 
contains the most common English misspellings and their 
correct spellings. This makes Smart Speller much easier to 
use, since it will not stop at every word and requires much 
less space. 

Smart Speller will also recognize any abbreviations you 
commonly use and replace them with their full spellings 
automatically! This feature alone can save you countless 
hours of typing time. 
Use with Text Formatter 

Screen Star works especially well with Computerware's 
OS-9 Text Formatter to provide a full word processing 
team. You simply imbed the Text Formatter commands in 
your Screen Star file. It will then be printed in style with 
headers, footers, pagination, justification, etc. We offer a 
special package price for this powerful duol 
Level 1 (or CoCo 1 and CoCo 2 

Screen Star uses OS-9, All Color Computer are sup- 
ported under Level 1. A special 51 x 24 screen driver is 
provided (and required) to make available the added 
screen capabilities. 10 functions keys are available to all 
users. 
Level 2 and CoCo 3 

CoCo 3 users can run Screen Star with either Level 1 or 
Level 2. Level 2 offers extended capabilities for scrolling 
and display features on an 80 x 24 screen. 

All versions Included 

All versions are included in the Screen Star package, so 
you can enjoy its power on any CoCo you use! 
Requires OS-9 $49.95 

With Text Formatter (Save $10) $74.95 



Call or write for your FREE Computerware Catalog 




OS-9 Text Formatter 



OS-9 Text Formatter interfaces with any editor that pro- 
duces standard ASCII text files including Computerware's 
Screen Star, and Radio Shack's TS Edit. 

Supports: 

• Right & Left Justification 

• Automatic Pagination 

• Headers and Footers 

• Macros, Tabs, Etc. 

• Page numbering & Auto Date Insert 

• Send ESC & CTL codes to printer 

Why just print it when you can FORMAT it with OS-9 Text 

Formatter. 

Requires OS-9 $34.95 




We've combined our 2 
most popular OS-9 packages 

Disk Fix + 
Advanced Utilities COMBO 



DISK FIX supports true double-sided/double density, 40 
tracks, and step rates up to 6 ms. KSHELL allows wildcards 
with any utility along with pathing. DMODE allows easy 
drive descriptor modifications. DIRCOPY copies complete 
disks with one command, any subdirectory, sorts direc- 
tory, replaces updated files with current ones, etc. PATCH 
is a very user-friendly program for inspecting and modify- 
ing any disk file. ARCHIVE backs up large disk media onto 
small disk media. Also includes FILELOOK, COMPARE, 
UNLOAD. FLINK. and CPY. Also available from Radio 
Shack Express Order Software. Catalog #900-0900. 
Requires OS-9 $49.95 




OS-9 Connection 3.0 



The best in communication software is now available for 
the OS-9 user. OS-9 Connection works on either Level 1 or 
Level 2 CoCo OS-9. All of the standard protocols are sup- 
ported including CompuServe Protocol B. XMODEM, and 
XON/XOFF. The dial feature for Hayes compatible and 
some Radio Shack modems is supported. You are able to 
print directly from the buffer, and files bigger than the 
buffer can be uploaded and downloaded. Macros allow 
easy entry to often-used passwords and ID's. Includes a 
51 x 24 hi-res screen, but will work with any OS-9 display. 
OS-9 Connection supports baud rates up to 1200 out the 
back RS232 port or higher with the RS232 pak. Communi- 
cate with confidence with OS-9 Connection 3.0. 
Requires OS-9 $49.95 

Color Connection — RSDOS 

The #1 communications package for RSDOS users. Works 
on CoCo 1, 2. or 3. Also Available from Radio Shack 
Express Order Software. Catalog #900-0348. 
RSDOS Disk $49.95 



Mitsuba 1200 Modem 



$159.00 




Monitors 

These 12" NAP monochrome 

monitors provide 20 mhz band 

width, 800 line resolution, 80 x 

25 display, and has audio 

input. 

Green or Amber display 

$114.95 
plus shipping $5.00 



Universal Video Plus 

Interfaces any CoCo 1 or Co Co 2 with a color or mono- 
chrome composite video monitor. 

$34.95 




* • • April Special • • • 

51 2K Memory Expansion 

ONLY $99.50 



51 2K Memory Expansion for CoCo 3 

Completely assembled with prime 120ns memory chips, 
this board is easy to install. Complete instructions are 
included. 

April Special $99.50 

CoCo 3 Ramdisk and 51 2K Diagnostics 

Ramdisk creates two additional drives that can be con- 
figured as & 1, or 2 & 3. Programs speed up significantly 
when run from a ramdiskl Memory Diagnostics test 
memory 3 ways. Copy Utility makes organizing disks a 
cinch. 
Requires CoCo 3, 51 2K, RSDOS $19.95 



Nuke the Love Boat I 




Your pleasure cruise has just turned into adventure on the 
high seas. This strategy simulation is a race against time 
and all the odds. Can you and the crew stop Abdul Mul- 
lah before he nukes the Love Boat? It is up to you to get 
the bomb out of terrorist hands. The entire ship and its 
crew will become involved. Doc. Julie. Issac, and Gopher 
will help you as the battle takes you from the pool side, to 
the dining room, to every deck on the ship. This simulation 
is fully mouse/joystick driven with pull down menus and 
windows. It fakes full advantage of the CoCo 3's gra- 
phics. If your CoCo has 51 2K. it wiil be used as a fast 
ramdisk. Good luck! Don't let them Nuke the Love Boatl 
Requires CoCo 3, mouse or joystick, disk $34.95 




Return of 
Junior's Revenge 

Designed to take advantage 
of the CoCo 3's 320 x 192 16- 
color display. It brings the ever 
popular arcade game Donkey 
Kong Jr. to life on the CoCo 3. 
Req. CoCo 3. Disk, joystick $34.95 



CoCo 3 Graphics! 



The Magic 
of Zanth 

You are on a journey to dis- 
cover the source of magic in 
the land of Zanth. Dragons. 
Griffins, Centaurs, and Demons 
abound. This intriguing adven- 
ture features over 2 dozen 320 x 
192 hl-res 16 color animated 
graphic screens. 
Requires CoCo 3, Disk $34.95 
(SSC pak optional) 




Call or Write to: 




COMPUTERWARE l*'»l «**-»" 

5^ Box 668 • Enclnltas. CA • 92024 



Name _ 
Address . 
City 



State . 



Yesl Send me your FREE catalog! 

VISA MasterCard 

Card II 

Signature 



cocon 



.Zip 



Exp 



Item 



Format 



Price 



Shipping 

Surface — S2 minimum 

2% fot orders over SI 00 
Air or Canada — S5 minimum 

5% for orders over SI00 
Checks are delayed for bank clea'ance 



6% Cahf Sales Tax . 

COD Add S5 . 

Shipping - . 

TOTAL . 



.; 



invenl^y control - printsffilclFTfrgs, too! 




s&CX~ t, ~ ?z~-*. 



yCoCo Presents 
he Weil-Behaved 

Yard Salt; 



.---'-- - 



By Eric White 

r ard sale! Words that can cause almost as much chaos 
as a blue-light special. This time you're holding the blue 
light. Here is a program designed to relieve some of the 
pressure of holding your next yard sale. 

Using a Color Computer, we will keep a complete inventory 
of all the items for sale and the prices of each item. If we add 
a printer, we can print price tags and a tally of sales at the 
end of the day from the computer's inventory. 

First, make a list of everything that will be sold at the yard 
sale and note the prices for each item. Next, load Yardsale into 
your CoCo and run the program. 

Upon running Yardsale, the program will automatically 
open a file called YARDSALE . DAT on the disk in Drive 0. If it 
doesn't find the file in the disk, it will create it. 



Eric White is a self-taught programmer with a graphic arts 
background, who has been writing^ 
software for five years. He lives 
in Altamont Springs, Florida, 
and has coauthored many 
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Press I to start data input. You will 
be asked to input a seller ID code. This 
is a two-character code that signifies the 
original owner of each item. Press 
ENTER to continue. This code is used to 
make separate totals for each seller, 
making it easy to combine several yard 
sales into one big yard sale. The current 
item number is displayed next to the ID 
code. Next, enter the description of the 
item to be sold. This description will 
appear on the price tag and on the tally 
sheet. Next comes the price you want to 
have printed on the price tag ($000.00 
to $999.99). Then, type in the lowest 
price you will sell the item for, and press 
ENTER. This number is used by the 
computer/ cashier person. If someone 
offers a bid on an item lower than the 
price tag, the bid can be checked against 
this price. The prompt "Any More 
Items to Enter (Y/N)?" will appear at 
the bottom of the screen. 

Price tags are printed on standard 
l5 /i6-by-3!^ inch computer labels. The 
printer codes used are in lines 2000 to 
2010 and are for normal and com- 
pressed print on the DMP-200. To print 
price tags for the items currently in the 
computer's inventory, press L (for 
label). Type in the title of the yard sale 
(up to 20 characters) and press ENTER. 
The current print range will be dis- 
played; press N to change the range or 
Y to print this range. 

To sell an item during the yard sale, 



press F for find. Type in the ID number 
printed on the lower left-hand corner of 
the price tag. That item's information 
will be loaded and displayed. If the item 
is not sold, you are prompted for "Sell 



sold, just press T for tally and S to print 
on the screen or P to print to the printer. 
The program will sort the items sold by 
seller ID codes and print the total for 
each seller separately. 





********************************* 

* ADVENTURE GRAPHICS YARDSALE * 
** ******************************* 
DESCRIPTION! COLLECTION OF KEYS WITH NO LOCKS 
IDJ: EW.0016 PRICE: $5.00 

EW.000S CAN OPENER GREASE 43.00 
EU.0012 BROKEN T.V. BET WITH CORD *50.00 
EW.0013 UNRAVELLED ROPES AND STRINGS S52. 35 




EW TOTAL * 105. 35 

Sample Printouts 



This Item (Y/N)?" Pressing N clears the 
item's data and returns to standby 
mode. Press Y to sell the item; type in 
the price and press ENTER to record the 
sale. Press CLEAR to abort a sale and 
return to standby mode. If the item has 
already been sold, the prompt will read 
"Re-inventory Item (Y/N)"; pressing Y 
returns the item to the inventory with 
a status of not sold. Pressing N returns 
program to standby mode. 
To see how many things have been 



If at any time you want to exit the 
Yardsale program, press CLEAR to 
abort the current activity, then press E 
for exit. This will not erase the program, 
but will close any disk files that were 
used by the computer before returning 
to BASIC. 

Good luck with your next yard sale, 
and maybe the next time you hear a 
crowd of Sunday afternoon shoppers 
yell "yard sale!" you will be safe behind 
your CoCo. □ 



1 hr listing YARD! 



V 




1950 


174 




1240 


219 


2130 


113 




1360 


199 


2230 


202 




1530 


88 


2390 


72 




1650 


243 


2570 


219 




1820 


49 


END 


.168 







************************ 
'* YARDSALE INVENTORY * 
S< PRICE TAG PROGRAM 

• ************************** 

'* (C) 1987 BY ERIC WHITE * 
ALL RIGHTS RESERVED. » 
» * VERSION: 

************************ 

GOSUB1880'DRAW SCREEN 
GOSUB 1970' OPEN FILES 
GOSUB19 10 : GOSUB2030 
PR1NT@4 80,WB$; 
GOSUB2040 



113/5 PRINT@480," ";:ON INSTR("IL 
",A$) GOTO 1.1.80,2070,1490,243 
,590 

1140 GOTO 1110 

,■ *************************** 

' ITEM DATA INPUT 
1170 *************************** 

1180 A$=" INPUT" : GOSUB2060 : R=LOF ( 

I) 

1190 LSET SF$=MKN$(0) 

1200 LSET ST$="I" 

1210 PRINT@481,"SELLER ID CODE ? 

)B$; :CS="" 
12 20 GOSUB2040:IF A$=CHR$(13) TH 
EN 1260 

A$=CHR$(8) AND LEN(C$) > 
THEN C$=LEFT$(C$,LEN(C$)-1) :P 
■9 8,C$WB$" ";:SOUNDl,l 

;NSTR (RIGHTS (VK$, 26) ,A$) 
AND LEN(C$)<2 THEN C$=C$+A$:PRI 
NT@498,C$WB$; :SOUNDl, 
1250 GOTO 1220 
1260 LSET ID$=C$ 
1270 R=R4-1:PRINT@205,ID$; : PRINTU 
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TOM MIX'S MINI-CATALOG 




Educational Best-Sellers! 



* P-51 Mustang 
Attack/Flight Simulation 

The ultimate video experience! Link two 
CoCo's together by cable or modem, and 
compete against your opponent across 
the table OR across the country! (Both 
computers require a copy of this program). 
The P-51 flight simulator lets you fly this WWII 
attack fighter in actual combat situations— 
against another player OR against the 
computer. 

32K Machine Language 

Flight Manual Included 

Tape $29.95 Disk $34.95 




Worlds of Flight 
Small Plane Simulation 

Real-time simulation generates panoramic 
3-D views of ground features as you fly 
your sophisticated plane in any of nine 
different "worlds." Program models over 35 
different aircraft/flight parameters. Realistic 
sound effects too! Manual included helps 
you through a typical short flight. 
32K Machi ne Languag e 
Righ t Manu al Included 
Joysticks Required 
TapeS29.95 Disk $34.95 



Teachers Database ll-Allows teachers 
to keep computerized files of students. 
Recently updated with many new features! 

■ Up to 1 00 students, 24 items per student 

• Many easy-to-follow menus 

• Records can be changed, deleted, 
combined 

• Statistical analysis of scores 

• Grades can be weighed, averaged, 
percentaged 

• Individual progress reports 

■ Student seating charts 

• Test result graphs/grade distribution 
charts 

64K TDBII $59.95 Disk Only 
32K TDBI $42.95 Tape $39.95 

NOW AVAILABLE FOR IBM PC & 

COMPATIBLES-Holds information on up to 
250 students with as many as 60 individual 
items of data for each. Contains the 
features listed above PLUS. 

Requires 128K - $89.95 



Factpack— Three programs for home or 
school use provide drill and practice with 
basic "-/+/-7x" Grades 1-6. 
32K Ext. Basic 
Tape $24.95 Disk $29.95 

Vocabulary Management System-Helps 
children learn and practice using vocabu- 
lary and spelling words. Eleven programs 
including three printer segments for tests, 
puzzles, worksheets and five games; many 
features make this a popular seller! 

Requires 1 6K Ext. Basic/ 
32K for Printer Output 

Tape $39.95 Disk $42.95 

Fractions— A Three-Program Package. 
1 /Mixed & Improper 2/Equivalence 
3/Lowest Terms. Practice, review and defi- 
nitions make learning easy. 
32K Ext. Basic 
Tape $30.95 Disk $35.95 




* NEW RELEASE 
GOLD FINDER 

Here's the quality you have come to expect 
from TOM MIX. Another outstanding color 
computer game. This one ranks right up 
there with "Donkey Kong". Listen to this: 
69 levels for one or two players PLUS you 
can create your own levels (up to 306 on 
a disk). Endless possibilities await you in 
this exciting new creation. Move over 
Goldrunner and Loderunner, here comes 
GOLD FINDER. . . 

32K & Joysticks Required 
Disk $27.95 

We Have More Software 

Available Than Listed Here. 

Please Write for a Free Catalog! 




NEW RELEASE 

THE BLACK HOLE 

For anyone who enjoys solving a challeng- 
ing logical puzzle, here is a 3-dimensional 
puzzle composed of 63 numbered cubes 
in a 4 by 4 by 4 array that leaves one 
BLACK HOLE. You tell the computer to sort 
the cubes and the computer tells you to put 
them in numerical order. A real brain 
bender. Outstanding color and action. 
Years of entertainment. . . 

For IBM PC & Compatibles 
$24.95 

More Tandy-IBM/PC software available. 



Unique Utilities! 

New! Use the tools we've used to create 
"Donkey King," "Sailor Man" and others! 
•Full use of 64K RAM 

• 1 00% Machine Language 

• No ROM Calls 

• Selectable Drive 

• Support 1-4 drives 

• Menu Selected functions 

• "Cold Start" exit to Basic 

• Parameters easily changeable in basic 
loader 

MAS Assembler-the finest ever! 
(Includes EDT) 

Disk $74.95 
EDT- Effortless full screen editing w/2-way 
cursor. Text files to 48K+. Copy, save, 
move, delete, print blocks, much more! 

Disk $39.95 
Deputy Inspector-Alphabetize, resort and 
backup directory; fast 3-swap backups, 
copy files or programs, auto-reallocate 
granules during backup for faster loading, 
more! 

Disk $21.95 
Sector Inspector- Alphabetize, backupand 
print directory; repair crashes, LUST basic 
programs, read in and edit 23+ grans, 
much more! 

Disk $29.95 

TOM MIX SOFTWARE 

P.O. Box 201 
Ada, Michigan 49301 

616/676-8172 
Ordering Information 

•Call us at 61 6/676-81 72 
for Charge Card orders 

• Add $3.00 postage and 
handling 

• Ml residents add 4% 
sales tax 

• Authors-We pay top 
royalties! 
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Look What's New at NOVRSOFT! 



Top-quality software at 

affordable prices, written by 

well-known authors in 6809 

Machine Language 





CoCo 3 Compatible only 

NEW RELEASE 

THE WILD WEST 

Get out your six shooter and polish your 
spurs! Journey into the gunslinging land of 
the old west. As sheriff of Dry Gulch, your 
job is to keep the peace. But the notorious 
desperado Black Bart has escaped from jail 
and is on his way to Dry Gulch to recover 
his hidden fortune! 

Can you set a trap to capture Black Bart? 
Or will he get you! You'll have to use every 
trick in the book, and be quick on the draw 
as well, as you talk to some unsavory 
characters. Decide what items you'll need 
to buy from the General Store, and lay a 
trap for your enemy! 
The Wild West Is designed to be played 
exclusively on the Tandy Color Com- 
puter 3.) It has several features not seen 
In most adventures. 

• Incredible animated 320 x 192 16 color hi 
resolution graphic scenes! 

• Four voice music and sound effects. 
•Save and load games in progress. 
•A vocabulary of over 100 words. 
•Automatically SPEAKS with a Tandy 

Speech Pak. 

Requires a 1 28k Coco 3 and one disk drive 
Disk $25.95 



* NEW RELEASE 

FOURCUBE 

Now you can play TIC-TAC-TOE in 3D. The 
board consists of a 4x4x4 grid of cells. Pit 
your wits against the computer with six 
levels of difficulty or against your favorite 
opponent. Sound easy? Try it and you'll 
agree with us when we say its a "real 
challenge". 

Requires 32K 1 or 2 Playe rs 
Tape $15.95 Disk $18.95 



Isi 7 



,'M 



,tn 



uuiiaiana nil 
oniiaitiau no 
puxt iimhi: 

pnv it's vbur Tunn 
E>a vau until tn 

ittfiniiMc'riu'n'a 
uiicpg iii cicPMiinc 

[IUIT QflMr 


i 

i 

n- 
i 

'.*-■ 
i 


I 


% % 


7 7 


--"?"$?,"!&■ 


Bairn' 





* 



Moneyopoly 



Play the popular board game on one of 
the most realistic computer game simula- 
tions ever! Contains all the features of the 
original. Buy, sell, rent, wheel & deal your 
way to fortune. 

32K Joystick Required 
Tape $19.95 Disk $22.95 




# Maui 

Step into the shoes of Crockett & Tubbs, 
and gather evidence, photographs and wit- 
nesses to convict your suspects! With 
"windows" to select your options, hi-res 
graphics, and a new story generated each 
time you play. This is state-of-the-art that 
guarantees excitement and newness every 
time you play. 

64K Ext. Basic & Joystick Required 
Disk $21.95 



* Vegas Game Pak 

Six games in all! Blackjack, Keno, Video 
Poker & 3 slot machine lookalikes. Super 
graphics! 

1 6K Ext. Basic Required 
Tape $24.95 Disk $27.95 



♦ NEW RELEASE 

LUNCHTIME 

Your chef, Peter Pepper, is surrounded! 
Dodge pickles, hot dogs, and eggs while 
building hamburgers. This high res game 
features 7 difficult levels of wild entertain- 
ment. Fast paced action for either one or 
two players. Have a Burger Time. . . 
Requires 32K & Joysticks 
Tape $18.95 Disk $21 .9 5 

Tom Mix Products at 
New Reduced Prices! 

Sailor Man -Defeat the bigfatbadguy and 
win Elsie's heart. Super graphics. # 

64K Tape $24.95 Disk $27.95 
*Dragon Slayer-Defeat the dragon by 
finding your way through a mountain maze. 
Gather treasure but avoid the deadly traps! 
160 exciting screens. 

32K & Joystick or Keyboard 
Disk $24.95 
The King- # 

32K Ta pe $24.95 Disk $27.95 
Draconian- ^e 

32K Tape $1 9.95 Disk $22.95 
Ms. Maze- * 

32K Tape $1 9.95 Disk $22.95 
Kater Pillar II- * 

1 6K Tape $1 9.95 Disk $22.95 
Warehouse Mutants- # 

1 6K Tape $1 8.95 Disk $21 .95 
Buzzard Bart- * 

32K Tape $19.95 Disk $22.95 

^Equals CoCo 3 Compatible 

NOVfiSOFT 

A Tom Mix Company 

P.O. Box 201 

Ada, Michigan 49301 

616/676-8172 

Ordering Information 

■ Add $3 shipping/handling 

• Ml residents add 4% sales tax 

• Dealers welcome 

■ Many more titles-write for free catalog! 

Credit Card Orders 

Call 616/676-8172 
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SING". ####";R/ 10000; 

1280 LSET INS=MKN$(R) 

129JZ5 GOSUB2030 

1300 PRINT@269,WB$;:PRINT@482., 

RESS [CLEAR] TO ABORT INPUT" ; : C$ 

=STRING$(3 6,32) :C 

1310 GOSUB2040:IF A$=CHF: TH 

EN1350 

1320 IF A$=CHR$(8) THEN C=C-1:MI 

D$(C$,C,1)= F C<19 THEN PRIN 

T@268+C,WB$:PRINT@301,RIGHT$(C$, 

18) ELSE PRINT@300+C-18,WB$" "; 

1330 IF INSTR((VK$+" !#$ *:- 

=@<>?,/"),A$) AND C<37 THEN MID$ 

(C$ , C , 1 ) =A$ : C=C+1 : PRINT02 69 , LEFT 

$ (C$,18) :PRINT@301,RIGHT$ (C$,18) 

:IF C<19 THEN PRINT@2 68+C, WB$ EL 

SE PRINT@300+C-18,WB$; 

1340 GOTO 1310 

13 50 LSET DI$=C$ 

1360 PRINT@269,LEFT$ (C$,18) : PRIN 

T@301,RIGHT$(C$,18) :C$="":C=0 

: 70 X=364 : SP=1000 : GOSUB14 30 : SP= 
VAL(C$)/ 100: LSET SP$=MKN$(SP) : PR 
INT@372," "; 

1380 X=3 75:C$="":GOSUB14 30:LSET 
MP$=MKN$(VAL(C$)/100) :PRINT@383, 



ii ii 



1390 PUT #1,R 

1400 GOSUB2030:PRINT@481,"ANY MO 
RE ITEMS TO ENTER (Y/N)"; 
14 10 GOSUB2040:IF A$=" 1EN GO 
SUB1910:GOTO1270 
14 20 GOTO 110,0 

1430 PRINT@X,USING"$$###.##";VAL 
(C$)/100;:PRINTWB$;:PRINT@3 7 3,"m 
in" ; 

1440 GOSUB2040:IF A$=CHR$(13) TH 
EN RETURN 

1450 IF A$=CHR$(8) AND LEN(C$)>0 
THEN C$=LEFT$(C$,LEN(C$)-1) :GOT 
01430 

1460 IF INSTR(LEFT$(VK$,10) ,A$) 
AND LEN(C$)<5 AND (VAL(C$+A$)/10 
0) < SP+.01 THEN C$=C$iA$:G0T014 
30 

1470 GOTO 1440 
1480 '************************** 

1490 • ITEM DATA OUTPUT 
1500 '************************** 

1510 A$="FIND" : GOSUB2060 : PRINT@4 

81, "IDEM CODE NUMBER ?"WB$ ; : C$=» 

":L$=C$ 

1520 GOSUB2040 

1530 S0UND1,1:IF A$=CHR$(13) THE 

N 1580 

1540 IF A$=CHR$(8) THEN PRINT@50 

0," ";:GOTO1510 



IF INSTR(VK$,A$) AND LEN(L$ 
)<7 THEN PRINTCHR$(8)A$WB$;:L$=L 
$+A$ 

1560 IF INSTR(LEFT$(VK$,10) ,A$) 
AND LEN(C$)<4 THEN C$=C$+A$ 
1570 GOTO 1520 
1580 PRINTCHR$(8) ;:R=VAL(C$) :C$= 
"":IF R < 1 OR R > LOF(l) THEN 1 
100 

1590 GET #1,R 
1600 PRINT@205,ID$; : PRINTUSING" . 

CVN (IN$)/ 10000; 
1610 IF ST$="I" THEN PRINT" NO 
T SOLD" ELSE PRINTUSING" SOL$$## 
#.##"; CVN (SF$ ) ; : PRINT@2 13 , "SOLD" 



PRINT@269,LEFT$(DI$,18) :PRI 
NT@301,RIGHT$(DI$, 18) 
1630 PRINT@375,USING"$$###. # # " ; C 
VM(MP$) ; :PRINT@373,"min"; 

PRINT@364,USING"$$###.##";C 
VN(SP$) ; 

1650 GOSUB2030:IF ST$="I" THEN 1 
670 ELSE PRINT0481, "RE-INVENTORY 

ITEM (Y/N) ?"WB$; 
1660 GOSUB2040:IF A$="Y" THEN LS 
ET ST$="I":LSET SF$=MKN$ (0) : PUT 
#1,R:G0T0 1590 ELSE GOTO 1100 
1670 PRINT@481,"SELL THIS ITEM ( 
Y/N) ?"; 
1680 GOSUB2040 
1690 IF A$o"Y" THEN 1100 
1700 GOSUB2030 

1710 PRINTS 4 81, "SELL FOR HOW MUC 
H ? $"WB$; :C$="" 
1720 GOSUB2040 

1730 IF A$=CHR$(8) THEN C$="":GO 
TO1710 

1740 IF INSTR(LEFT$(VK$,11) ,A$) 
AND LEN(C$)<6 THEN C$=C$+A$ : PRIN 
T@503,C$WB$; 
1750 IF A$=CHR$(13)THEN17 60 ELSE 

1720 
1760 IF VAL(C$)<.01 THEN 1100 
1770 IF VAL(C$)+1> CVN(MP$) THEN 

GOTO1830 ELSE GOSUB2030 
1780 PRINT@480, STRINGS (3 1,32) ; :P 
RINT@4 80,USING"$$###.##";VAL(C$) 
;: PRINT" IS LOWER THAN MINIMUM." 

'0 A$=INKEY$ : PLAY"V5 ;T200ABCD" 
:IF A$="" THEN 1780 

1800 GOSUB2030:PRINT@481,"SELL A 
T "; :PRINTUSING"$$###.##";VAL(C$ 
);:PRINT" ANYWAY (Y/N)?"; 
1810 GOSUB2040 
1820 IF A$="Y" THEN 1830 
00 



56 



THE RAINBOW April 1987 



": 



830 LSET SF$=MKN$(VAL(C$) ) : LSET 

ST$="S":PUT #1,R 
1840 GOTO1100 
1850 '************************** 

18 6 f DRAW SCREEN 

1870 *************************** 

1880 CLS0 

1890 F0RX=1T096 : PRINT@X-1 , CHR$ (A 

SC(MID$("J;J;<J=;JGF;HIH=;RWW;LZ 

M;Z; ; ;ZWWH>J;J; J;J>I ;§E; J;OWV;Z ; 

Z;Z; ; ;ZWW>>I ; JGJ; J;J;BFBC;XNY;ZW 

NN",X) )+117) ; :NEXT 
1900 FOR X=128 TO 479 : POKE1024+X 

i XTX: RETURN 
]910 PRINT@192,"item"; :PRINT@ I 

umber" :POKE1227, 58 
1920 PRINT0256, "discription" : POK 
E1291.58 

a PRiNT@3pa," H 

1940 PRINT@353 /'price"; :PRINT@3 5 
9, "list min":POKE1387,5 

8 

1950 PRINT84 16, "Input"; : PRINT@42 

Labels"; : PRINT04 31, "Find" ; :PR 

INT@437 , "Tally" ; : PRINT@444 , "Exit 

1960 RETURN 

1970 OPEN "D",#1,"YARDSALE/DAT", 
59 

1980 FIELD #1,2 AS ID$,5 AS IN$, 
36 AS DI$,5 AS SP$,5 AS MP$,1 AS 
ST$,5 AS SF$ 

•0 VK$="0123456789.ABCDEFGHIJK 
LMNOPQRSTUVWXYZ" : WB$=CHR$ ( 207 ) 
2000 NM$=CHR$(27)+CHR$(19) 'NORMA 

RINT 
2010 CP$=CHR$(27)+CHR$(20) ' COMPR 
ESSED PRINT 
,1 RETURN 
2030 PRINT@128," COPYRIGHT 198 

BY ERIC WHITE" :FORX=1535 TO I 
4 STEP-1 : POKEX, 207 : PLAY"P200" : PO 
KEX ,96: NEXTX : RETURN 
2040 A$=INKEY$:IF A$=""THEN20 
2050 IF A$=CHR$(12) THEN 1100 EL 

RETURN 
2060 PRINT0128 , "» : B$=A$ : X=INT (32 
■) ) :FORY=2 TO X:B$=: 
K% :NF.XTY: PRINTS 128+ (32-LEN( 
D$) )/2,B$: RETURN 
2070 GOTO2110 

., "TALLY" ;: GOTO 112 



2090 CLOSE #1:CLS:END 

2100 *************************** 

J ' PRINT PRICES LABELS 
2120 '**************■************ 
2130 A$="LABELS":GOSUB2060:PP 



@481, "TITLE ? "WB$;:C$="" 

2140 GOSUB 2040: IF A$=CHR$(13) T 

HEN T$="*"+STRING$(31,32)+"*":MI 

D$(T$,18-(LEN(C$)+9)/2,LEN(C$)+9 

) =CS+" YARDSALE" : C=l : C$=RIGHT$ (S 

TR$(LOF(l) ) ,LEN(STR$(LOF(l) ) )-l) 

: PRINTCHR$ ( 8 ) ; : GOT02 180 

2150 IF A$=CHR$(8) AND LEN(C$)>0 

THEN C$=LEFT$(C$,LEN(C$)-1) : PRIN 

T@490,C$WB$" " ; 

2160 IF INSTR((VK$+" I #$%&'() *:- 

=@<>?,/"),A$) AND LEN(CS)<20 THE 

N C$=C$+A$:PRINT@490,C$WB$; 

2170 GOTO 2140 

2180 GOSUB2030:PRINT@481, "PRINT 

RANGE"C"- "C$" (Y/N)"; 

2190 GOSUB2040:IF A$="Y" THEN 23 

w 

2200 GOSUB2030:PRINT@481, "ENTER 
RANGE, FROM: "WB$" TO:";:C$="" 
2210 GOSUB 2040: IF A$=CHR$(13) A 
ND VAL(C$)>0 AND VAL(C$) < (LOF( 1 ) 

THEN 2250 
2220 IF A$=CHR$(8) AND LEN(C$)>0 
THEN C$=LEFT$(C$,LEN(C$)-1) : PRIN 
T@499,C$WB$" " ; 
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V Software <r 

-KEEP-TRAK' General Ledger Reg. $69.95— ONLY $24.95 

Double-Entry'' General Ledger Accounllng Syll.m lor homo or business: 16K. 
32k. 64k User-friendly, menu-driven Program features: balance sheet, income & 
expense statement (current & VTD') journal, ledger. 899 accounts & 2350 entries 
on 32k & 64k (710accounts 4 entries on 16k) (disk only) Version 12 has screen 
printouts Rainbow Reviews 1.1 - 9/84 : 1.2-4/85 

"OMEGA FILE" Reg. $69.95— ONLY $19.95 
Filing data base File any information wilh Omega File. Records can have up to 16 
fields wilh 255 characters per field (4080 characters/record). Sort, match & print 
any field. User friendly menu driven Manual included (32k/64k disk only) 
Rainbow Review 3/85. Hot CoCo 10/85 
BOB'S MAGIC GRAPHIC MACHINE 
Can generate BASIC code to use in your programs. Easy drawing and manip- 
ulation of circles, elipses. boxes, li nes and ARCS. Single joystick operation with on 
lino HELPS at all times. Allows text on the graphics screen & movement of objects 
on the screen. Can be used as a stand-alone graphics editor. Instruction Manual. 
GRAPHICS EDITOR. Boo $39.95— ONLY $19.95 for disk or tape 64k ECB. 
Rainbow Review 7/85. Hot CoCo 9/85 "The graphics bargain of the yamr" 

KEEP-TRAK' Accounts Receivable. 

Features: auto interest calculation, auto ageing of accounts, installment sales, 
total due sales, explanation space as long as you need, detailed statements, 'KEEP- 
TRAK' General Ledger tie in, account number checking, credit limit checking & 
more. User friendly/menu driven. Includes manual. $39,95 or $49.95 General 
Ledger & Accounts Receivables. (Disk Only). 

'COCO WINDOWS' 

With hi-res character display and window generator. Features an enhanced key 
board (klicks) and 10 programmable function keys. Allows the user to create 
multiple windows from basic. Includes menu driven printer setup and auto line 
numbering. Four function calculator, with memory. The above options can be 
callod anytime while running or writing in BASIC. APPLE PULL YOUR DRAPES. 
YOU DON'T WANT TO SEE THIS. $19.95 (disk or tape) includes manual. 

CALL TOLL FREE 

1-800-942-9402 



THE OTHER GUY'S SOFTw.ro (Add (2.50 for pottage A handling) 

P.O. Box H, 55 N. Main C.O.O., Money Order, Check In U.S. Funds 

Logan, UT 84321 (601)753-7620 (Pl.no »p«clly II J4M controller) 
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S2230 IF INSTR(LEFT$(VK$ 
AND LEN(C$)<3 THEN C$- ><IN 
T@499,C$WB$; 
2240 GOTO 2210 

22 50 PRINT@499tLEN(C$; : PRIN 

T@ 507 , WB$ ; : C=VAL ( C$ ) : C$= " " 
2260 GOSUB2040:IF A$=CHR$(13) AN 
D VAL(C$)+1>C AND VAL(C$)<LOT 
i 1 THEN 2180 
| .'2 70 IF A$=CHR$(8) AN! 

(EN C$=LEFT$(C$,LEN(C$)-1) :PR1 
@507,C$WB$" 
2280 IF INSTR(LEFT$(VK$,10) ,A$) 
AND LEN(C$)<3 THEN C$=C$+A$ : PRIN 

507,C$WB$; 
2290 GOTO 2260 

2300 GOSUB2030:PRINT@481,"IS 
PRINTER READY ? (Y/N) " ; : GOSUB20 

L0 IF A$o"Y" THEN 1100 

.0 FOR X=C TO VAL(C$) 
2330 PRINT#-2,STRING$(33,"*") 
2340 PRINT#-2,T$ 
2350 PRINT#-2, STRINGS (33, "' 
2360 GET #1,X 
2370 PRINT#-2 / CP$"DESCRIPTTON: 



GRAFPLOT 



NEW ! — "THE BEST JUST SOT BETTER 

/sstmcnt Project ionl T-Bills, FY '8? 



6RAFPL0T DEMOl 

• 3.00 DISK t, TAPE Si 

REFUND N/PURCHABE.U' 

COMPATIBLE 
WITH COCO 3 

30 DAY 

UNCOND I T I ONAL 1 
MONEY-BACK 
GUARANTEE ' ' 

/^ 

RAINBOW 




Months Since T-B1II Investments 

• AUTOHATICALLY LOADG DATA FROM MOST POPULAR BPREADBHEETS. 

« 2*7 1 GRAPHING SYMBOLS AND UNLIMITED OVERLAY OF DATA. 

« AUTOMATICALLY SCALES AND LABELS ALL THREE OF THE AXES. 

I CALCULATES MATH FUNCTIONS, INTEBRALB AND MOVING AVERAGES. 

> FULLY AUTOMATIC, MENU DRIVEN W/ COMPLETE ERROR TRAPPING. 

■ FULL-PAGE BCREENPRINT8 ON ANY PRINTERi SPECIFY WITH ORDER . 

REQUIRES 3?K EXT. BASICl TAPE - 440. OO DISK - 443.00 



^nte R Picture Jrtrject UT ^;; 

UNIVERSAL SCREENPRINT PROGRAM 
» COMPATIBLE WITH COCO III ! ! 

» -PERFECTLY 8IMPLE" TO OPERATE - "SIMPLY PERFECT" RE8ULT8! 

* "PERFECTLY COMPATIBLE" WITH ALL DOT MATRIX PRINTERS' 

* GET "PERFECT CONTROL" OFi HEIGHT, WIDTH, POSITION, 

BAUD RATE, DOT DENSITY, NE6ATIVE IMAGE8, ETC. 

* THE "PERFECT SOLUTION" TO YOUR GRAPHICS PRINTING NEEDB ! 

* COMPATIBLE WITH GRAPHICOM AND COCO MAX PICTURES! 

♦ ONLY »23.00 ON DISK OR TARE -» 



BUY BOTH PROGRAMS S. SAVE » 1 O - OO 

CALL NOW FOR FREE INFORMATION 1413) 347-7337, OR WRITEl 

HAWKE8 RESEARCH BERVICEBl B39 STANFORD AVE, OAKLAND, CA 94608 
YOUR PERSONAL CHECK IS WELCOME! SHIPMENT WITHIN 48 H0UR8 ! 

ADD 43.00 SHIPPING DN ALL ORDERS. CA. REB1DENTB ADD SALES TAX 



2390 
2400 

2420 
2430 



"DI$ 

2380 PRINT#-2,"ID#: "NM$ID$;:PR 
INT#-2 ,USTNG" .####"; X/10000 ; : PRI 
NTtt-Z, "CP$"PRICE: "NM 

$;: • f usiNG ,, $$###. ##";<: 

Lsp$J 

fr! ,nm$:nextx:goto1100 

• ************************** 

PRINT TALLY 
i ************************ 

A$="TALLY":GOSUB2060: PRINTS 
4 Bl, "TALLY TO SCREEN/PRINTER (S/ 

2440 GOSUB 2040: IF A$=CHR$(13) T 

.00 
2450 IF A$="S" THEN DV=0:GOTO248 

2460 

2470 
2480 
2490 



I 



IF A$="P H THEN DV=2:GOT0248 



GOTO 2440 

F0RX=1 TO L0F(1) 

GET #1,X:A=0 

IF I$(A)=ID$ THEN 2540 

IF I$(A)=" M THEN I$(A)=ID$: 
GOTO2 540 

2520 IF A>9 THEN 2540 
2530 A=A+1:G0T0 2500 
2 540 NEXTX:IF DV=0 THEN CLS 
2 550 FORY=0 TO A:TL=0 : F0RX=1 
LOF ( 1 ) 

2560 GET #l f X:IF ID$=I$(Y) AND S 
T$="S" THEN 2 620 
2570 NEXTX:IF TL THEN PRINT#-DV, 
STRINGS (53,"-") : PRINT#-DV, STRING 
$(36,32)I$(Y)" TOTAL"; : PRINTrr-DV 
,US . ##" ;TL: PRINT #-DV:P 

RINT#-DV 

2580 IF DV=0 AND TL>0 THEN GOSUB 
2040: CLS 
2590 NEXTY 

2600 IF DV=0 THEN GOSUB1880 
2610 GOTO1100 
2620 PRT! 7,I$(Y) ; :PRINT#-DV, 

US I' ■■■"; : X/10000 ; 
2630 I $; : PRINT* -D 

V,USING"$$###. «#" ;CVN(SF$) 

2640 TL=TL+CVN(SF$) :GOTO2 570 

• **************** 

1 * YARDSALE INVENTORY * 
'* & PRICE TAG PROGRAM * 

• ************************** 

"» (C) 1987 BY ERIC WHITE * 
»* ALL RIGHTS RESERVED. * 
' * VERSION: 1.00 8701.02 * 
i ************************** 



2680 
2690 

2700 

2720 



/R\ 



58 



THE RAINBOW April 1987 



Better guess fast because the fuse is lit 



w \»s« 



-.JNvri 



*BTkci 



y Kent Baumgardt 



W TTord Guess is a game in which you have a limited 

B/M/ number of tries to guess a hidden word before 
r V the dynamite explodes. Load the program and 
run it. You will see an orange color screen while the 
computer is setting up the variables. You are then asked to 
enter a level ( 1 -3) and the number of words ( 1 0-80) you want 
to guess. The game now starts. 

On the left side of the screen is the dynamite with a long 
fuse. Under the Words Left indicator, you see several boxes 
in a row. This indicates the length of the word you are to 
guess. Begin by pressing any letter key (try vowels to start). 

If your guess is correct, it appears on one of the bottom 
lines (this helps you remember your guess) and in one of 
the boxes. Your score is updated too. 

If you make an incorrect guess, you will hear a sound, 
your letter appears only on the bottom line and the fuse 
burns. If you run out of tries, the screen flashes. You will 
see the level you played on, your score and the word you 
didn't complete. Then you are given the option to end or 
play again. You can press CLEAR during the game to end. 
Here is a listing of variables and what they do in the 
program: 



Variable 


Description 


WD$(l-80) 


Words to guess 


N$ (0-9) 


Number drawing data 


AL$(l-26) 


Alphabet drawing data 


1$ 


Input through INKEYS 


LL$ 


Letters to be drawn 


NN$ 


Numbers to be drawn 


W$ 


Single character in current word 




(compared with your input) 



Kent Baumgardt is 16 years old and lives in Dayton, Ohio. 
He began working with computers when a 64 K ECB CoCo 
was purchased for the family in January of 1984. In addition 
to ECB programming and graphics, he is interested in 
machine language. 



VI, V2 


Large, small fuse burn 


H, V 


Coordinates for drawing guessed 




letters 


ACU 


Accumulator 


LN 


Length of current word 


GT 


Game total score 


sc 


Word score 


x, y 


Coordinates for drawing 



If you have questions or comments you can call me at 
(513) 252-4848 anytime from 2 p.m. to 6 p.m. EST or write 
to me at 3522 East Fifth St., Dayton, OH 45403. □ 




April 1987 THE RAINBOW 59 



fl 


...189 


24 .... 


...208 


40 .... 


....77 


49 .... 


....27 


70 .... 


...232 


85 .... 


....71 


104 ... 


....64 


118 ... 


....73 


END 


214 





The listing: WDRDGUES 

PCLEAR4 : CLEAR200 : DM=80 

1 PMODE4,l:PCLS:GOSUB15:PCLS:SCR 
EEN1 , 1 : GOSUB3 1 : PCLS : GOSUB10 5 : PCL 
S : GOSUB20 

2 F0RX=1T0DM:READWD$(X) : NEXT 

3 » t I i I l i MAIN PROGRAM »'••'•••« 

4 F0RNM=1T0D: CIRCLE (15, 140) ,10, , 
. 5 : WD=RND ( DM) : ACU=0 : LINE ( 15 , 1/8 ) - 
(15,140) ,PSET:MV=0:LN=LEN(WD$(WD 
) ) :WD$=WD$ (WD) : IFWD$ (WD) ="X"THEN 
3 

5 F0RXX=1T0LN: LINE ((XX* 10) +100,1 
30)-((XX*10)+110,140) ,PSET,B:NEX 
T 

6 GOSUB38:IFACU=LN THEN13 

7 IFI$=CHR$(12)THENCLS:PRINT@39, 
"YOUR SCORE IS:"GT+SC:PRINT@232, 
"HAVE A GOOD DAY! I": END 

8 IFI$>"@»ORI$<"^"GOSUB87 

9 FORG=lTOLN:W$=MID$(WD$(WD) ,G,1 
) :IFI$<>W$THENNEXTG 

10 IFI$=W$THENMID$(WD$(WD) ,G,1) = 
CHR$(255) :CI=CL:X=G*10+103:Y=138 
: LL$=I$ : BP=0 : GOSUB58 : GOSUB90 : NEX 
TG:GOT06 

11 IFBP=1THENCI=IL:G0SUB67:G0SUB 
90 

12 GOTO 6 

13 LINE (165, 90) -(200, 100) , PRESET 
, BF : M=M-1 : X=170 : Y=100 : NN$=STR$ (M 
) : GOSUB51 : GT=GT+SC+CW : SC=-CL: GOS 
UB90 : GOSUB93 : GOSUB95 : WD$ (WD) ="X" 

14 FORPP=1TO1000:NEXT:LINE(40,13 
0)-(255,169) , PRESET, BF:H=42:Y=16 
9:NEXTNM:GOT0115 

15 •• 'INITIALIZE VARIABLES' 1 ' 

16 CLS:SCREEN0,1:DIMWD$(DM) ,N$(9 
) ,AL$(27) ,V1(18) ,V2(18) :H=42:V=1 
69 

17 DRAW"BM100,100NU10NE7NR10NF7N 
D10NG7NL10NH7 " : GET ( 90 , 90 ) - ( 1 10 , 1 
10),V1,G 

18 DRAWBM200 , 100NU5NE3NR5NF3ND5 
NG3NL5NH3":GET(190,90)-(210,110) 
,V2,G 

19 F0RX=1T027:READAL$(X) :NEXT:FO 
RX=0TO9 : READN$ ( X ) : NEXT : RETURN 



20 • i • i i i i i i DRAW TITLE •• i i i i i i 

21 X=54:Y=15:S=10:SP=14:LL$=" W 
R D G U E S S":GOSUB58 

22 LINE(42,5)-(205,20) ,PSET,B:CI 
RCLE ( 15 , 140 ) , 10 , , . 5 : CIRCLE ( 15 , 18 
0), 10,,. 5,0,. 5: LINE (5, 140) -(5, 18 
0) ,PSET:LINE(25,140)-(25,180) , PS 
ET:LINE(15,10)-(15,140) , PSET 

23 FOR X=40 TO 240 STEP 10 : LINE ( 
X,170)-(X+7,170) , PSET: NEXT 

24 X=3 5:Y=60:LL$="GAME TOTAL": GO 
SUB58:GOSUB93 

25 X=160:Y=60:LL$="THIS WORD": GO 
SUB58 

26 CI=0:GOSUB90 

27 X=100:Y=40:LL$="LEVEL ":GOSUB 
58 

28 X=145:Y=40:NN$=STR$(LV) :GOSUB 
51 

29 X=80:Y=185:LL$="PRESS CLEAR T 
END":GOSUB58 

30 X=90:Y=100:LL$="WORDS LEFT":G 
OSUB58 : X=170 : NN$=STR$ (M) : GOSUB51 
: RETURN 

31 i I i t I l i LEVEL INPUT "" 

32 X=90:Y=70:LL$="SELECT LEVEL": 
GOSUB58 : X=100 : Y=105 : NN$=" 1" : GOSU 
B51:X=125:Y=105:NN$="2":GOSUB51: 
X=150 : Y=105 : NN$=" 3 " : GOSUB51 

33 GOSUB38 : IFI$<"l"ORI$>"3"THEN3 
3ELSELV=VAL(I$) 

34 IFLV=1THENX1=98:Y1=106:X2=106 
: Y2=98 : INC=8 . 5 : CL=20 : IL=-2 : CW=10 

35 IFLV=2THENX1=123:Y1=106:X2=13 
1 : Y2=98 : INC=13 : CL=30 : IL=-4 : CW=15 

36 IFLV=3THENX1=148:Y1=106:X2=15 
6 : Y2=98 : INC=2 6 : CL=40 : IL=-6 : CW=20 

37 FORZ=1TO10:LINE(X1,Y1)-(X2,Y2 
) , PSET, B: FORPP=1TO50 : NEXT : LINE (X 
1 , Yl) - (X2 , Y2 ) , PRESET, B : FORPP=lTO 
50 : NEXT : NEXT : RETURN 

3 8 ■ » i n i I I ! "INKEY$' i i • i •■■• t i i i 

39 SOUND 200,2 

40 I$=INKEY$:IFACU=LN THEN41ELSE 
IFI$=""THEN40 

41 RETURN 

42 ' 'LETTER AND NUMBER DATA' ' 

43 DATA BU1U4E1R2F1NG4D4G1L2H1BD 
1 

44 DATAU5E1R2F1D2NL4D3BL4,U6R3F1 
D1G1NL3F1D1G1L3 , BU1U4E1R2F1BD4G1 
L2H1BD1,U6R2F2D2G2L2,U6R4BD3BL1L 
3D3NR4 

45 DATA U6R4BD3BL1L3D3,BU1U4E1R3 
BD4NL1D2L3H1BD1,U6BR4D3NL4D3BL4, 
BU6BR1R2L1D6NR1L1BL1,BU6BR4D5G1L 
2H1BD1,U6D3R1NE3NF3BD3BL1 

46 DATA NU6NR4,U6F2ND1E2D6BL4,U6 
D1F4NU5D1BL4 , BU1U4E1R2F1D4G1L2H1 
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TM 

the Color Computer Word Processor 



3 display formats: 51/64/85 

columns x 24 lines 

True lower case characters 

User-friendly full-screen 

editor 

Right justification 

Easy hyphenation 

Drives any printer 

Embedded format and 

control codes 

Runs in 16K, 32K, or 64K 

Menu-driven disk and 

cassette I/O 

No hardware modifications 

required 



THE ORIGINAL 



Simply siaied, Telewriter is the mosl powerful 
word processor you can buy for the TRS-80 
Color Computer. The original Telewriter has 
received rave reviews in every major Color 
Computer and TRS-80 magazine, as well as 
enthusiastic praise from thousands of satisfied 
owners. And rightly so. 

The standard Color Computer display of 32 
characters by 16 lines without lower case is 
simply inadequate for serious word processing. 
The checkerboard letters and tiny lines give you 
no feel for how your writing looks or reads. 
Telewriter gives the Color Computer a 51 
column by 24 line screen display with true 
lower case characters. So a Telewriter screen 
looks like a printed page, with a good chunk of 
text on screen at one time. In fact, more on 
screen text than you'd get with Apple II, Atari, 
TI, Vic or TRS-80 Model III. 
On top of that, the sophisticated Telewriter 
full-screen editor is so simple to use, it makes 
writing fan. With single-letter mnemonic 
commands, and menu-driven I/O and 
formatting, Telewriter surpasses all others for 
user friendliness and pure power. 

Telewriter's chain printing feature means that 
the size of your text is never limited by the 
amount of memory you have, and Telewriter's 
advanced cassette handler gives you a powerful 
word processor without the major additional 
cost of a disk. 



...one of the best programs for the Color 
Computer I have seen... 

— Color Computer News, Jan. 1982 



TELEWRITER-64 



But now we've added more power to 
Telewriter. Not just bells and whistles, but 
major features that give you total control over 
your writing. We call this new supercharged 
version Telewriter-64. For two reasons. 



64K COMPATIBLE 



Telewriter-64 runs fully in any Color Computer 
— I6K, 32K, or 64K, with or without Extended 
Basic, with disk or cassette or both. It 
automatically configures itself to take optimum 
advantage of all available memory. That means 
that when you upgrade your memory, the 
Telewriter-64 text buffer grows accordingly. In 
a 64K cassette based system, for example, you 
gel aboul 40K of memory to store text. So you 
don't need disk or FLEX to put all your 64K 
to work immediately. 



64 COLUMNS (AND 85!) 



Besides the original 51 column screen, 
Telewriter-64 now gives you 2 additional high- 
density displays: 64 x 24 and 85 x 24!! Both 
high density modes provide all the standard 
Telewriter editing capabilities, and you can 
switch instantly lo any of the 3 formats with a 
single control key command. 
The 51 x 24 display is clear and crisp on the 
screen. The I wo high density modes are more 
crowded and less easily readable, but they arc 
perfect for showing you the exacl layout of 
your printed page, all on the screen at one 
time. Compare this with cumbersome 
"windows" that show you only fragments at a 
time and don't even allow editing. 



RIGHT JUSTIFICATION & 
HYPHENATION 



One outstanding advantage of the lull-width 
screen display is that you can now set the 
screen width to match the width of your 
printed page, so that "what you see is what 
you get." This makes exact alignment of 
columns possible and it makes hyphenation 
simple. 

Since short lines are the reason for the large 
spaces often found in standard righl justified 
text, and since hyphenation is the most 
effective way to eliminate short lines, 
Telewriter-64 can now promise you some of the 
best looking right justification you can get on 
the Color Computer. 



FEATURES & SPECIFICATIONS: 



Printing and formatting: Drives any printer 
(LPVll/VIIl. DMP-100/200. Epson. Okidata, 
Centronics, NEC, C. Itoh, Smith -Corona, 
Tcrminet, etc). 

Embedded control codes give full dynamic access to 
intelligent printer features like: underlining, 
subscript, superscript, variable font and type Size, dot- 
graphics, etc. 

Dynamic (embedded) format controls for: top, 
bottom, and left margins; line length, lines per page, 
line spacing, new page, change page numbering, 
conditional new page, enable/disable justification. 
Menu-driven control of these parameters, as well ns: 
pause ut page bottom, page numbering, baud rate (so 
you can run your printer at lop speed), and Epson 
font. "Typewriter" feature sends typed lines directly 
to your printer, and Direct mode sends control codes 
right from the keyboard. Special Epson driver 
simplifies use with MX-80. 

Supports single and multi-line headers and automatic 
centering. Print or save all or any section of the text 
buffer. Chain print any numbet of files from cassette 
or disk. 



File and I/O Features: ASCII format files — 
create and edit BASIC, Assembly, Pascal, and C 
programs. Smart Terminal files (for uploading or 
downloading), even text files from other word 
processors. Compatible with spelling checkers (like 
Spell 'n Fix). 

Cassette verify command for su'c saves. Cassette auto- 
retry means you type a load command only once no 
matter where you are in the tape. 
Read in, save, partial save, and append files with disk 
and/or cassette. For disk: print directory with free 
space to screen or printer, kill and rename files, set 
default drive. Easily customized to the number of 
drives in the system. 

I- 'film;; features: Fast, full-screen editor with 
wordwrap, block copy, block move, block delete, line 
delete, global search and replace (or delete), wild card 
search, fast auto-repcat cursor, fast scrolling, cursor 
up. down, right, left, begin line, end line, lop of text, 
bottom of text; page forward, page backward, align 
text, tabs, choice of buff or green background, 
complete error protection, line counter, word counter, 
space left, current file name, default drive in effect, 
set line length on screen. 

Insert or delete text anywhere on the screen without 
changing "modes." This (ast "free-form" editor 
provides maximum ease of use. Everything you do 
appears immediately on the screen in front of you. 
Commands require only a single key or a single key 
plus CLEAR. 



...truly a state of the art word processor... 
outstanding in everv respect. 

— The RAINBOW, Jan. 1982 
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PROFESSIONAL 
WORD PROCESSING 



You can no longer afford to be without the 
power and efficiency word processing brings to 
everything you write. The TRS-80 Color 
Computer is the lowest priced micro with the 
capability for serious word processing. And 
only Telewriter-64 fully unleashes that 
capability. 

Telewriter-64 costs S49.95 on cassette, $59.95 
on disk, and comes complete with over 70 
pages of well-written documentation. (The step- 
by-step tutorial will have your writing with 
Telewriter-64 in a matter of minutes.) 
To order, send check or money order to: 

Cognitec 

704 Nob Street 

Del Mar, C A 92014 

Or check your local software store. If you have 
questions, or would like to order by Visa or 
Mastercard, call us at (619) 755-1258 (weekdays, 
8AM-4FM PST). Dealer inquiries invited. (Add 
$2 for shipping. Californians add 6% state tax.) 

Available at 
Radio /hack stores 
via express order 

catalogue #90-0253 
90-0254 

Apple I! is a trademark of Apple Computer. Int.; Alan i* a trademark 
of Alan, Inc.; TRS-80 is a trademark of Tandy Corp; MX-80 ii J 
trademark of Epson America, Inc. 



BD1,U6R3F1D1G1L3D3,BU1U4E1R2F1D3 
G1NH1NF1G1L1H1BD1 

47 DATA U6R3F1D1G1L3R1F3BL4,BU5B 
R4H1L2G1D1F1R2F1D1G1L2H1BD1 , BU6R 
4L2D6BL2 , BU1U5BR4D5G1L2H1BD1 , BU6 
BR4D2G1D1G1ND1H1U1H1NU2BD4 , NU6E2 
NU1F2NU6BL4 

48 DATA BU6D1F2E2NU1BD4ND1H2G2D1 
, BU6BR4D1G2ND3H2NU1BD5 , BU6R4D1G4 
D1NR4 

49 DATA BU1U4E1R2F1NG4D4G1L2H1BD 
1 , BU6BR2NG1D6R1L2BL1 , BU5E1R2F1D1 
G1L1G2D1NR4 , BU5E1R2F1D1G1NL1F1D1 
G1L2H1BD1 , BU2NR4U1E3D6BL3 

50 DATA BU6NR4D3E1R2F1D2G1L2H1BD 
1 , BU6BR2NR2G2D3U2R3F1D1G1L2H1BD1 
, BU6R4D1G3D2BL1 , BU1U1E1NR1H1U1E1 
R2F1D1G1NL1F1D1G1L2H1BD1 ; BU4NF1U 
1E1R2F1D2NL3D1G2L2 

51 •••••' DRAWING NUMBERS mill 

52 F0RNN=1T0LEN(NN$) 

53 N1$=MID$(NN$,NN,1) 

54 N=ASC(Nl$)-48 

55 IFN<0THEN57 

56 DRAW"BM=X; ,=Y;XN$ (N) ; " 

57 X=X+7: NEXT: RETURN 

58 ' ' ' ' ' DRAWING LETTERS ■•••»•' 

59 IFBP=1THENS0UND1,2 

60 IFBP=0THENACU=ACU+1 : SOUND100 , 
2 

61 F0RLL=1T0LEN(LL$) 

62 L1$=MID$(LL$,LL,1) 

63 L=ASC(Ll$)-63 

64 IFL<0THEN66 

65 DRAW"BM=X ; , =Y ; XAL$ (L) ; » 

66 X=X+7: NEXT : C=0 : RETURN 

67 ••••»•••• FUSE BURN '•'•'••'' 

68 FORBR=1TO10:PUT(5,MV)-(25,MV+ 
20) ,Vl,PSET:PUT(5,MV)-(25,MV+20) 
,V2,PSET:NEXTBR 

69 MV=MV+INC:IFMV>119THEN70ELSEL 
INE(0,0)-(25,MV+20) , PRESET, BF: RE 
TURN 

70 i f i n i 1 1 • 'EXPLOSION' '••'•'• 

71 FORX=1TO20:PLAY"L255T255O1V31 
CGEF":NEXT 

7 2 FORX=1TO10 : IFC=1THENC=0ELSEC= 
1 

73 PLAYSTR$ (RND( 12) ) :PCLSC: SCREE 
N1,C:NEXTX 

74 SCREEN1 , 1 : PCLS1 : DRAWC0" : GT=G 
T+SC 

75 X=90:Y=30:LL$="YOU BLEW IT" 
:GOSUB58 

76 X=130:Y=50:LL$="ON" :GOSUB58 

77 X=90 : Y=70 : LL$="LEVEL" : GOSUB58 

78 X=170:Y=70:NN$=STR$(LV) : GOSUB 
51 

79 X=90 : Y=80 : LL$="SCORE" : GOSUB58 



: X=170 : NN$=STR$ (GT) : GOSUB51 : IFGT 
<0THENDRAW"BM164,77R5" 

80 X=40:Y=120:LL$="THE WORD WAS 
":GOSUB58 

81 LINE(130,112)-(LN*10+123,123) 
, PRESET, BF 

82 X=132 : Y=120 : DRAW'Cl" : IFLN>4TH 
ENLL$=" "+WD$ : GOSUB58ELSELL$=WD$ 
:GOSUB58 

8 3 X=60 : Y=150 : DRAWC0" : LL$="PRES 
S ENTER TO REPLAY" : GOSUB58 

84 X=60:Y=160:LL$="PRESS CLEAR T 
STOP":GOSUB58 

85 GOSUB 38 

86 IFI$=CHR$(12)THENCLS:PRINT§23 
2, "HAVE A NICE DAY! ! " :ENDELSEIFI 
$=CHR$(13)THENRUNELSE85 

87 ••••••• "GUESSES* •'••••'•' 

88 X=H:Y=V:IFI$<>""THENLL$=I$ 

89 BP=1:GOSUB58:H=H+10: RETURN 

90 i i i n «• "WORD SCORES mum 

91 LINE(150,76)-(220,66) , PRESET, 
BF : SC=SC+CI : X=180 : Y=75 : NN$=STR$ ( 
SC) :GOSUB51:IFSC<0THENDRAW"BM178 
,72R5" 

92 RETURN 

93 i n t I i i 'GAME TOTAL 1 »••"•••' 

94 LINE(50,75)-(100,65) ,PRESET,B 
F: X=60 : Y=75 : NN$=STR$ (GT) : GOSUB51 
: RETURN 

95 i i i i i i i i i "REWARD' i i i • t i i n 

96 F0RPP=1T05 

97 AA=(LN*10)+115 

98 LINE(105,125)-(AA,145) ,PSET,B 
:SOUND10,1 

99 LINE (100, 120) -(AA+5, 150) , PSET 
,B:SOUND30,1 

100 LINE(95,115)-(AA+10,155) , PSE 
T,B:SOUND50,1 

101 LINE (105, 125) -(AA, 145) , PRESE 
T,B:SOUND10,1 

102 LINE (100, 120) -(AA+5, 150) , PRE 
SET,B:SOUND30,1 

103 LINE (95, 115) -(AA+ 10, 155) , PRE 
SET,B:SOUND50,1 

104 NEXT: RETURN 

105 ' ' ■ ' ' 'NUMBER OF WORDS •'•'•• 

106 X=30:Y=30:LL$="PLEASE ENTER 
NUMBER OF WORDS" : GOSUB58 

107 FORPP=1TODM/10:READX,Y,LL$,N 
N$ 

108 IFLEN(NN$)<3THENNN$=" " 
+NN$ELSENN$=" "+NN$ 

109 GOSUB58:GOSUB51:NEXT 

110 GOSUB38 : IFI$<"A"ORI$>"L"THEN 
110 

111 D=(ASC(I$)-64)*10:IFD>DM THE 
ND=DM 

112 DRAW"S6" : F0RPP=1T05 : X=200 : Y= 
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100 : LL$=I$ : SOUND150 , 1 : GOSUB58 : FO 
RP=1TO50:NEXT: LINE (195, 105) -(210 
, 90 ) , PRESET , BF : FORP=1TO50 : NEXT : N 
EXT: DRAW'S 4" 

113 M=D: RETURN 

114 DATA60,50,A,10,60,60,B,20,60 
,70,0,30, 60, 80, D, 40, 60, 90 ,E, 50, 6 
0, 100, F, 60, 60, 110, G, 70, 60, 120, H, 
80 

115 »» i i I I i i ENDING ••'•'••» i i 

116 DRAW" CI" 

117 PCLS:X=30:Y=40:LL$="I DONT H 
AVE ANY MORE WORDS" :GOSUB58 

118 X=65tY=50:LL$="FOR YOU TO GU 
ESS":GOSUB58 

119 X=70 : Y=70 : LL$="LEVEL" : G0SUB5 
8 

120 X=120:Y=70:NN$=STR$(LV) :GOSU 
B51 

121 X=70 : Y=80 : LL$="SCORE" : G0SUB5 
8 

122 X=120:Y=80:NN$=STR$(GT) :G0SU 
B51 

123 X=40:Y=100:LL$=" PRESS E TO E 
ND":GOSUB58 

124 X=40:Y=110:LL$="PRESS R TO R 
EPLAY":GOSUB58 

125 G0SUB3 8 : IFI $="E"THENCLS : PRIN 



T§232,"HAVE A GOOD DAY! ! "ELSEIFI 
$="R"THENRUNELSE125 

126 1 1 i i i i i i 'WORD DATA' """in 

127 DATA DIVISION, HELLO, SIMPLE, L 
AST , GENESIS , TAPE , HOUSE , GENTLE , QU 
IET, HAPPY 

128 DATA SUBTLE, LIZARD, FLOWER, MA 
N, CHILD, WOMAN, BOY, GIRL, GOODNESS, 
THRIFTY 

129 DATA ACHE , BACKGROUND , CABBAGE 
, DAIRY , EAGER , FACT , GAIN , IC Y , KEEN , 
LACK 

130 DATA MACHINE, OBJECT, PACE, QUA 
RT , RANGE , SABBATH , TABLET , UGLY , VAI 
N, WAGES 

131 DATA YIELD, ZERO, ABILITY, BAGG 
AGE , CALENDAR, DAILY , EARNEST , FACTO 
R , GARAGE , HANDSOME 

132 DATA IDEAL, JANITOR, KEROSENE, 
MACHINERY , NAMELY , OBSERVATION , PAJ 
AMAS , QUALIFIED , RADAR, SALESMAN 

133 DATA TABERNACLE, UNBELIEVER, V 
ACANT , WANDER , YOURSELVES , ZEBRA , AB 
OARD , BACHELOR , CABINET , DAMNATION 

134 DATA EDUCATIONAL, FACULTY, GEN 
IUS, HARASS, IDENTIFY, JEWELRY, KIDN 
APPED , LEGAL , MAINTENANCE , NATURALL 
Y 
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SPECIAL DEAL ON 
500 PROGRAMS! 



GET 50 DISKS OR 50 CASSETTE TAPES FULL OF OVER 
500 PROGRAMS. HERE IS WHAT YOU'LL RECEIVE: 

*Over 250 Utility/Home Application Programs including a 
Word Processor, DataBase, Spreadsheet, Account Man- 
ager, 2 Basic Compilers, Terminal Programs, ROM Copies, 
Mail List, Machine Language Tutorials, Plus Much More! 

*Over 200 exciting games including Warlords, Star Trek, 
Super Vaders, Solar Conquest, Horse Races, Football, 
Baseball, Frog Jump, Invader, Plus Much More! (Many 
machine language games) 

* Over 30 adventures including The College Adventure, Dun- 
geon Master, Space Lab, Ice World, Ship Wreck, Zigma 
Experiment. Plus 32K Graphic Adventures. 

EACH INDIVIDUAL ISSUE SOLD FOR 
EACH OR s 450 FOR ALL 50 ISSUES. 
SLASHED THE PRICE TO ONLY 150. 00 . 
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REG. H50 






00 



••THIS MONTH ONLY** 




Buy this package of 500 programs and 

receive a free 6 month subscription. 

(A «35 value) 
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RAINBOW 

CtftTHTCATlON 
MAI 



THEGREATESTSOFTWAREDEAL 
ON EARTH JUST GOT BETTER! 



THAT'S RIGHT! THIS MONTH WE'VE DROPPED OUR YEARLY 
SUBSCRIPTION RATE AN UNBELIEVABLE '1 0.°° TO ENTICE YOU 
INTO SUBSCRIBING WITH US. GET 1 2 DISKS OR TAPES A YEAR 
CONTAINING OVER 120 QUALITY PROGRAMS. A SUBSCRIP- 
TION TO T & D SOFTWARE CONSISTS OF 10 READY-TO-LOAD 
PROGRAMS DELIVERED BY FIRSTCLASS MAIL EVERY MONTH. 

NO WE ARE NOT THE SAME AS THE RAINBOW ON TAPE. IN 
FACT, MANY SUBSCRIBERS HAVE WRITTEN IN AND SAID THAT 
WE ARE MU_CH BETTER THAN RAINBOW ON TAPE! 




PRICES 

TAPE THIS 

OR DISK MONTH ONLY 
1 YEAR (12 Issues) JMf 60.00 

6 MO. (6 Issues) AfKUf 35.00 

1 1SSUE -ftflO" 8.00 

Michigan Restdems Ado 4% 
Overseas Add SI lo Subscription Pnce 
Personal Checks Welcome! 



• 1 6K-64K Color Compuler OUR LATEST ISSUE CONTAINED 

• Over 4000 Satisfied Customers 1. Accounls Receivable 6. Fool Race 

• Back Issues Available From 2. Work Male 7. Flippy Ihe Seal 
•July '82 (Over 500 Programs) 3. Calendar 8. Screen Calculator 

^■i^ 4. Invasion 9. Able Builders 

i^SS\ 5. TnpAdvenlure 10. Super Error 2 f-3 



7^$ 

RAINBOW 

CERTIFICATION 
UAL 



Available on COCO 1, 2 and 3! 
All Pfograms Include Oocu mentation ' 



MasterCard 



T & D SUBSCRIPTION SOFTWARE, 2490 MILES STANDISH DR., HOLLAND, Ml 49424 (616) 399-9648 
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COCO 3 UTILITY 




Disabling the CoCo 3 
Color Burst Signal 



By Robert Gault, Ph.D 



The color burst is the part of a television 
signal that tells the receiver the signal is in 
color. If the color burst is missing, the TV 
or monitor will turn off its color circuits. 

If a composite monitor is used with the high 
resolution text screens, particularly the 80- 
character screen, there is considerable color 
artifacting of the letters. If a monochrome 
monitor is used, the color information leaves 
distortion on the screen. It is desirable in both 
cases to be able to turn off the color output of 
the CoCo 3. 

The color burst can be controlled with Bit 4 
(0-7) of byte $FF98. When this bit is clear, the 
color burst is on. When the bit is set, the color 
burst is off. What is needed is a way to keep this 
bit set as required. CoCo has not made this easy 
for us. Each time a pass is made through the idle 
loop at command level, Bit 4 of SFF98 is cleared. 
The offending code starts at SE019. First a test 
is made of which text screen is in use: 32-, 40- 
or 80- character. Then, three tables are used to 
obtain values to store into the GIME chip. The 
values stored into SFF98 are located at SE033, 
SE03C and SE045. The following line of code 

Robert Gault holds a doctorate in chemistry and 
works as a forensic toxicologist. He has owned his 
Color Computer since 1983, and has published several 
Color Computer articles. 



results in the color burst being turned off in all 
three text screens. It must be reused each time you 
push the reset button: 

POKE &HE033,16:POKE &HE03C,19: 
POKE S.HE045,19 

To obtain the best contrast, you should use 
black and white for the foreground/ background, 
not colors. This can be adjusted with the palette 
command. Even with the color burst off, there 
is enough high frequency information in the 
signal to confuse the monitor if the PALETTE 
colors are not set to black and white. 

For the 32-character screen, use: 

PFILETTE12 , : PRLETTE13 , G3 : CLS 
or 

PPLETTE12 , G3 : PPLETTE13 , 0: CLS. 

For the 40- or 80-character screen, use: 

PRLETTE0 , : PRLETTE8 , S3 : CLS1 
or 

PPLETTE0 , G3 : PFILETTEB , 0CLS5. 

(You may direct questions about this article to 
Dr. Gault at 832 N. Renaud, Grosse Pointe 
Woods, MI 48236, 313-881-0335. Please enclose 
an SASEfor a reply when writing.) /R * 
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Buy the PRO-COLOR- 
SERIES for $79.95 and get 12 
months of The Rainbow FREE! If 
you are an existing subscriber* 
to The Rainbow, we'll renew your 
subscription for an additional 12 
months. This is a savings to you 
of $31.00! The PRO-COLOR- 
SERIES consists of three programs. 
PRO-COLOR-FILE 'Enhanced* V2.0 Design a record struc- 
ture up to 60 fields with 1020 spaces per record, 4 custom 
designed data entry screens, math functions on single records with 
IF-THEN-ELSE capability. Extremely flexible reporting capability 
for totals, averages and summaries. Mailing label generation of up 
to 10 labels across and 30 lines per label. Use the posting function 
to perform mathematical calculations on the entire database, with 
records updated automatically. Output reports to the printer, disk or 
screen. Send information directly into a DYNACALC" compatible 
file for use in spread sheets. Design custom menus for report 
selections and streamline repetitive tasks into one keystroke with 
the command processor. Sort 750 records in less than 5 minutes 
and create special indexes of your file for reporting and accessing. 
Store as many records as your disk will hold! 
PRO-COLOR-FORMS V2.0 This mail-merge feature will 



Buyl 

@et12 

FREE! 



allow you to write a letter and 
have names from your database 
inserted automatically. Design 
invoices, inventory cards and 
other forms. Or if you use pre- 
printed forms, you can set up a 
template to print information in 
the appropriate places. You can 
use printer codes for features like "bold" and "underline." If you 
have our TELEGRAPHICS " program, you can have hi-res pictures 
included as part of the form! You can even right justify your text for 
a more professional look. 

PRO-COLOR-DIR This utility will read the directory of all 
your diskettes and create a data file that can be accessed by 
PRO-COLOR-FILE. Store up to 1,000 entries on one diskette and 
generate a master report that shows where each program is in your 
library. You can keep track of the date you created a disk and the 
date you last updated it by generating labels for your disks. 
The PRO-COLOR-SERIES gives you database capabilities found on 
larger computers, but at a fraction of the cost. Our PRO-COLOR- 
SERIES lets you organize important information together in one 
place, right at your finger tips. Not only will you be getting the most 
widely used database program for the CoCo 1 , 2 and 3, but also the 
ONLY magazine that can give you all the facts about the CoCo! 



□ Yes, I would like to receive The PRO-COLOR-SERIES and 12 months of the Rainbow magazine 
tor just $79.95. 



NAME 



Aoimss 



mom 



For soli ware: 

$ 3 shipping/handling 

$12 overseas 

For subscription: 
$37 overseas surface 
$72 overseas air mail 
$ 7 Canada 

No refunds or returns on this offer. 
NoCODs. 



CITY 



STATE 



ZIP 



If renewing, please include the mailing label from your latest issue 
of The Rainbow. 

Derringer Software, Inc. 

PO Box 5300 Florence, SC 29502-5300 
(803)665-5676 



SIGNATURE 



ACCOUNT NUMBER 



EXPIRATION DATE 
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Assorted Shorties 



raphics 






raphics rio 

By Randy Cassel 



CoCo3 



I thought nothing would make me give up my old CoCo, 
but the CoCo 3 is amazing. The new commands are fantastic, 
and I've written three programs that show off the ways the 
PALETTE command can be used for animation. 

Spinner is an animated rotating pinwheel. Try changing 
the fraction 1/60 to 1/45, 1/30 or 1/15. Remember to make 
the changes in all lines where it appears, lines 60, 70 and 100. 
Also, try changing the H/W ration in the HCIRCLE command 
in Line 70. 

The second program, Circles, is a random circle generator. 
Experiment here by changing HCIRCLE to HLINE- 
(A,B),PSET,BF and insert Line 65, HCOLOR RND(C)0 and 
delete Line 80. Also try HSET (ABC) and delete Line 80. 

The final program, IPopper, uses the 32-column screen. I 
think it has possibilities in Adventure games. 




v 
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Products! 



• SECRETS REVEALED 



An introduction to the Color Computer III that compares the 
differences between the CoCo I/II and the NEW CoCo III. Includes: 
GIME chip specs, CoCo II to CoCo III converter, CoCo III memory 
map and a 128K/512K RAM test. "Offers some very good information 
to programmers ." - Rainbow Review Feb '87 $19.95 




• C III GRAPHICS 



4 Buy 'em both ' 
A for $29.95 






Se o araf 



e 'y for 



A drawing program for the CoCo III using the new Enhanced graphic 
features: 320x192 graphics, 16 of any 64 colors, plus the ability 
to Save and Load 32K screens. "Paint pretty pictures on the 
CcCo3 ." - Rainbow Review Dec '86 $19.95 

• ROLLER CONTROLLER 

Meet the challenge of super fast arcade action using the brilliant colors of the CoCo III. Six completely dif- 
ferent maddening mazes with progressive skill Levels. 128K DISK $29.95 (see Rainbow Review May '87) 

• COCO III FONT BONANZA - April '87 Rainbow 

Replace the " PLAIN " CoCo III characters from a menu of INCREDIBLE fonts or create your own. 128K DISK $29.95 

• ELITE WORD 80 - #1 COCO III Word Processor 

The third generation CoCo Word Processor is here! All the powerful features, advantages and benefits of 
EliteWord plus 40/80 column display formats for the CoCo III . Available only from Spectrum Projects! $79.95 
Special word processing package of EliteWord and EliteSpel for $99.95 (see Rainbow Review March '87) 

• FKEYS III - Function Keys for COCO III 

A productivity enhancement that gives you the capability to add twenty (20) pre-defined functions to the CoCo 
III by using the CTL, Fl and F2 keys! $24.95 (see April '87 Rainbow Review ) 

• 51 2K UPGRADE (NOW $99.95*) 

Easy installation with a su perior design for a reliable upgrade, processing efficiency and AVAILABLE f*PW for 
the CoCo III! $99,95* A 512K upgrade without RAM chips $49.95* (see March '87 Rainbow Review ) 
*-The lowest upgrade prices in the Rainbow magazine, period!!! 

• RGB PATCH - No more BLACK & WHITE dots ... 

Did you buy an expensive RGB monitor ( CM-8 ) just so that you could see your Hi-Res artifactinq CoCo 2 games in 
BLACK S WHITE ??? RGB PATCH converts most games to display in COLOR on an RGB monitor. 128K DISK $24.95 

• VIDEO DIGITIZER III - 25 Frames/sec 

Take pictures with speed! The fastest CoCo Video Digitizer ever! Twenty-five (25) frames a second (3 Xs faster 
than the DS-69A!) Now available for the CoCo III. $149.95 Req. 120K CoCo III with a 40 pin 'Y' cable or Y-Box. 

• RGB MONITOR - Better than CM-8! 

Our monitor is much more v ersatile than the Tandy CM-8 ! Takes a variety of video inputs, including: RGB 
Analog, Color Composite and RGB TTL. Unlike the CM-8, PMODE 4 artifact colors don't show up BLACK and WHITE 
(when processed through the Color Composite input) $299.95 

• PAL SWITCHER - Designed by Marty Goodman! 

Have the best of both worlds by being able to switch between CoCo II and CoCo III modes when using a Multi-Pak 
Interface. Req. OLDER PAL S NEW PAL chip for the 26-3024 Multi-Pak Interface $29.95/with NEW PAL chip $39.95 



Guide to CoCo III Graphics $19.95 
CcCo III Multipak PAL chip $19.95 
CoCo III Monochrome driver $39.95 



CoCo III Unraveled Ml! $29.95 
CoCo III Service Manual $39.95 
512K CoCo III Computer $299.95 



All orders plus S3.00 S/H (Foreign $5.00) - COD add $2.00 extra - NYS Residents add Sales Tax 



HOWARD BEACH NY 11414 
COCO HOT LINE 718-835-1344 



Listing 1: SPINNER 

10 ON BRK GOTO 140 

20 C=l 

30 POKE65497,0 

40 PALETTE 0,0:HSCREEN2 

50 FOR X=l TO 15: PALETTE X,RND(6 

3) :NEXT 

60 FOR X=l TO STEP -1/60 

70 HCIRCLE(160,96) , R, C, 1 , X+S , E+X 

+ 1/60 

80 C=C+1:IFC>15 THEN C=l 

90 NEXT X 

100 S=S+l/60:E=E+l/60:C=l:R=R+5: 

IFR>95 THEN 120 

110 GOTO 50 

120 FOR X=l T015: PALETTE X,63:PA 

LETTE X,0:NEXT X 

130 GOTO 120 

140 PALETTE CMP: POKE 65496,0 

Listing 2: CIRCLES 

10 ON BRK GOTO 110 

20 POKE65497,0 

30 PALETTE 0,0:HSCREEN2 

40 FOR X=l TO 15: PALETTE X,RND(6 

3) :NEXT X 



50 FOR X=l TO 75 

60 A=RND(3 20)-1:B=RND(192)-1:C=R 

ND(15) 

70 HCIRCLE(A,B) ,RND(25) ,C 

80 HPAINT(A,B) ,RND(15) ,C 

90 NEXT X 

100 PALETTE RND ( 15) , RND ( 63 ) : GOTO 

100 
110 POKE 654 9 6,0: PALETTE CMP 

Listing 3: IPOPPER 



10 


WIDTH 32 




20 


ON BRK GOTO 150 




30 


CLS 




40 


PRINT"TYPE SOMETHING 


(32 


ER 


LIMIT) " 




50 


LINEINPUTA$ 




60 


IF LEN(A$)>32 THEN 30 




70 


A=INT((32-LEN(A$) )/2) 




80 


PALETTE 13,0 




90 


CLS 




100 


PRINT@224 : PRINTTAB (A) A$ 


110 


FOR X=l TO 63 




120 


PALETTE 12,X 




130 


NEXT X 




140 


GOTO 110 




150 


PALETTE CMP 





LETT 



Home Help 



Grocery 

By Donald Large 



4K 



Several years ago 1 started helping my wife with chores 
around the house. I learned the "right" way to vacuum the 
carpets, wash the dishes and do the laundry. About the only 
weekly chore 1 couldn't get right was grocery shopping. In 
spite of the various notes that were pinned to my jacket, 1 
still managed to forget something, get the wrong brand, or 
neglect to use the proper coupon. 

I looked for a program to make grocery lists, but couldn't 
find one, so 1 decided to write my own. I started by taking 
a tour through the grocery store where we normally shop, 
and took note of where different items were located. I then 
designed a printout sheet to follow this path (except where 
item groupings didn't follow the layout of the store). I then 
added a spot to indicate coupons I might have, and a place 
for any special instructions. 

This short program will produce 10 shopping lists. Each 
time you get ready to do your grocery shopping, fill it out. 
It will help you get everything you need, remind you to use 
your coupons, and specify the correct brands you need to 
look for. 



Portion of Sample Printout 



SHOPPING LIST 



ITEM COUPON BRAND 



FRESH VEG. 

CANNED VEG. 

CEREAL 

RICE 

BAKING MIXES 

PUDDING 

JELLY 

CRACKERS 

PICKLES 

MILK 

EGGS 

COLD CUTS 

FROZEN HEAT 

TUNA 

FROZEN DESERTS — 

SUGAR 

PEPPER 

COOKING OIL 
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SUPER CHIP -SALE- ... 

6821 Standard PIA :SS»93: $6.95 

Basic ROM 1.1 Chip '33*105: $9.95 

6847 TOG Chip:$»*a5: $12.95 

6809E CPU Chip3i*Ta5r $12.95 

CoCo III Multipak - "NEW" PAL chip (For Gray and 

White 26-3024 models ONLY) $19.95 

Grig SAM Chip (6883)^29»QS: $19.95 

Basic ROM 1.3 ( Newest version) $19.95 

68766 EPROM - (Fits all Basic ROMS) $19.95 

Disk ROM 1.1 - (Needed for CoCoIII ) $29.95 

New SAM Chip with heatsink (74LS785) $29.95 

Ext Basic 1.1 ROM - NEW LOW PRICE $29.95 

CoCo First Aid Kit - includes two PIA's, 6809E CPU 

and SAM Chips ^59^95: (BE PREPARED) $39.95 

EPROM Programmer - uses 2716s up to 27512 s! Super 
fast programming! - See April '86 review .$149.95 

COCO LIBRARY ... 

A History of the CoCo / 1980-1986 $6.95 

New! 200 MORE Pokes, Peeks 'N Execs $9.95 

Basic Programming Tricks Revealed $14 .95 

CoCo Memory Map $16.95 

500 Pokes, Peeks 'N Execs $16.95 

A Guide to CoCo III GRAPHICS $19.95 

Basic 09 Tour Guide $19.95 

New! New! CoCo II Service Manual (Specify CoCo II 

Catalogue model number) $29.95 

CoCo III Service .Manual $39.95 

The Complete Rainbow Guide to OS9 $19.95 

Guide with Two Disk Package of demo pgms ...$49.95 
Color/Extended/Disk Basic Unraveled - A completely 
commented disassembly of the CoCo ROMS ! Comprehen- 
sive three (3) Book Set - Save $10! $49.95 

MORE GOOD STUFF ... 

WICO Adapter - Hookup 2 Atari type joysticks. $19. 95 
CoCo Keybd - Low profile, fits all CoCo lis £ "F"s 
WAS $39.95 - NOW $19.95. D/E CoCo I adapter $12.95 
WICO Trackball - Regularly $69.95 , Now only. $24. 95 
Universal Video Drvr- All monitors £ CoCos .$29.95 
(2) Chip 64K Upgrade - 26-3134 A/B CoCo II .$29.95 

28 pin Bet Basic - 26-3134 A/B CoCo II $34.95 

Computize "Y" Box - Better than a Y cable ..$39.95 

KAMELECN Parallel Printer Interface $49.95 

Top FD-501 Drive 1 (#26-3131) - SAVE $60 ..$139.95 

COCO III DISK DRIVE $239.95 

512K COLOR COMPUTER III $299.95 



All orders plus $3.00 S/H (Foreign $5.00) 
COD add $2.00 extra 
NYS Residents add Sales Tax 



COCO CABLES AMD ... 

Printer/Modem 15' Extender Cable $14.95 

Tired of unplugging devices from your RS232 port? 

Try a RS232 "Y" Cable $19.95 

TANDY CM-8 RGB Analog 6' Extender Cable ....$19.95 

Disk Drive Cable (34pin - 34pin) $19.95 

Modem Cable - 6ft (DB25-DB25) $19.95 

Joystick / Mouse 10" Ext Cable $19.95 

Dual Disk Drive Cable (3-34pin) $24.95 

MAGNAVOX 8505 / 8515 Analog RGB cable $24.95 

Other Analog RGB monitor cable ( Specify !) ..$39.95 
15" Multi-Pak/Rom Pak Extender - Move your Multi- 
ROM Paks further away $29.95 

40 Pin Dual "Y" Cable - Hook up a Disk with a 

Voice Pak, Word Pak, CoCo Max, etc $29.95 

Triple RS232 Switcher - Now easily select any one 

of three RS232 peripherals $39.95 

40 Pin Triple "Y" Cable - Hook up any three (3) 
Voice/Word/RS232/Digitizer PAKs $39.95 

OTHER GOOD STUFF ... 

C-10 tapes in any quantity 59 cents 

5 1/4 " Diskettes , any quantity 79 cents 

Rompak w/Blank PC Board 27xx series $9.95 

Video Clear - This cable will reduce TV interfer- 
ence created by CoCo! $19.95 

The Magic Box - Load Mod I/III Basic program tapes 

into the CoCo $24.95 

Deluxe RS-232 PAK -ra3©*aSTNow only $29.95 

DOS Switcher - Select from any two DOSs (Disk 1.0 

1.1, JDOS) in a JSM disk controller $29.95 

Prig CoCol "D" Rev motherboard . Includes all chips 
(SAM, CPU, PIA's) except RAM and Ext Basic! $39.95 

"D" Rev motherboard w/o socketed chips $16.95 

256K RAM Chips (Set of 8) $39.95 

HJL-57 Keyboard - CoCo III version! Comes complete 
with special FREE Function Key Software ....$59.95 

HDS Controller w/1.1 ROM (SAVE$20) $79.95 

Super Controller - Up to 4 DOSs by a POKE ..$99.95 
1200 Baud Modem (Hayes compatible) Auto-dial /answer 
$139.95. Req's Modem cable ( 4pin or DB25 ) ..$19.95 

Amdek Drive System with controller $239.95 

GEMINI Printer - 120cps, NLQ mode $249.95 

MAGNAVOX 8515 RGB Analog monitor $349.95 

SPECTRUM PROJECTS 
PO BOX 264 
HOWARD BEACH IMY 11414 

COCO HOT LINE 

718-835-1344 



The program was designed for a DM P- 1 20 printer, but you 
can change the control codes in lines 30, 40, 60, 90 and 210 
to adjust them to your printer. You can also change or add 
items by adjusting the DATA lines beginning with Line 260. 
Happy shopping! 

The listing: GROCERY 

5 REM GROCERY LIST 

6 REM BY DONALD LARGE 

7 REM NORTH SYRACUSE, NY 1984 
10 POKE 150,41 

20 FOR Z= 1 TO 10 
30 PRINT#-2,CHR$(27) CHR$(19) 
40 PRINT#-2,CHR$(27) CHR$(14) 
50 PRINT#-2," SHOPPING LIST" 
60 PRINT#-2,CHR$(27) CHR$(15) 
70 RESTORE 

80 X$=" ":Y$=" 

":Z$=" " 

90 PRINT#-2,CHR$(27) CHR$(20) 
100 PRINT#-2, , "ITEM", "COUPON", "B 
RAND" , , "ITEM" , "COUPON" , "BRAND" 
110 PRINT#-2," ************* 
******************************** 
******************************** 
******************************** 
***********■' 

120 PRINT#-2 

130 FOR A= 1 TO 41 

140 READ A$,B$ 

150 PRINT#-2,X$,A$,Z$,Y$,X$,B$,Z 

$,Y$ 

160 NEXT A 

170 PRINT#-2, "SPECIAL INSTRUCTIO 

NS : " 

180 FOR A = 1 TO 5 

190 PRINT#-2 , " 



200 NEXT A 

210 PRINT#-2, CHR$(27) CHR$(19) 
220 FOR V= 1 TO 8 
230 PRINT#-2 
240 NEXT V 
250 NEXT Z 

2 60 DATA FRESH VEG . , FROZEN VEG., 
CANNED VEG . , IN . POTATOES , CEREAL, F 
LOUR, RICE, PANCAKE MIX, BAKING MIX 
ES,JELLO, PUDDING, PEANUT BUTTER, J 
ELLY , COOKIES , CRACKERS , SOUP , PICKL 
ES , OLIVES , MILK , CHEESE , EGGS , BUTTE 
R 

2 70 DATA COLD CUTS , MEAT, FROZEN M 
EAT, CANNED MEAT, TUNA, FROZEN DINN 
ERS, FROZEN DESERTS , ART. SWEETN 'R, 
SUGAR, SALT , PEPPER, SPICES , COOKING 
OIL, CATSUP , MUSTARD , MAYONAISE , ST 
EAK SAUCE, SALAD DRESSING, RELISH, 
SYRUP 

2 80 DATA BREAD, HOTDOG BUNS , HAMBU 
RG BUNS, DINNER ROLLS , MUFFINS , SOD 
A,LO-CAL SODA, BEER, KOOL AID, DOG 
FOOD, CAT FOOD, CLEANSER, FURN.POLI 
SH , BATTERIES , UTENSILS , GLUE , TAPE , 
VITAMINS, ASPRIN, SOAP, LAUNDRY DET 
ERG. 

290 DATA SOFTENER, STARCH, BLEACH, 
HAND LOTION, SHAMPOO, RAZOR BLADES 
, SHAVING CREAM, GARBAGE BAGS,STOR 
AGE WRAP, NAPKINS, PAPER PLATES , PA 
PER CUPS, LUNCH BAGS, TOILET PAPER 
, FEM . PRODUCTS , OTHER , OTHER , OTHER , 
OTHER 



Who's On First 

By John Fugh, Jr. 



16K 
ECB 



This is a program that produces a score card for those who 
keep score of baseball games. It is designed to work on a 
DMP-105 printer. 

The listing: BASEBALL 

10 GOTO 40 

20 PRINT#-2,CHR$(27) ;CHR$(28) ; 

30 RETURN 

40 POKE 282,0 

50 CLS: INPUT "ENTER THE HOME TEAM 

";HOME$ 



60 INPUT"ENTER THE AWAY TEAM" ; AW 

AY$ 

70 POKE 282,255 

80 J=-2 

90 PRINT#J,HOME$" vs. "AWAY$ 

100 GOSUB 20 

110 K$=CHR$(241) 

120 L$=CHR$(243) 

130 H$=CHR$(242) 

140 GOTO 500 

150 PRINT#J,CHR$(240) ;STRING$(15 

,CHR$(241) ) ;L$;STRING$(5,K$) ;L$; 

STRING$(5,K$) ;L$;STRING$(5,K$) ;L 

$ ; STRING$ ( 5 , K$ ) ; L$ ; STRING$ ( 5 , K$ ) 

; L$ ; STRING$ ( 5 , K$ ) ; L$ ; STRING$ ( 5 , K 

$) ;L$;STRING$(5,K$) ; L$ ;STRING$ (5 

,K$) ;H$ 

152 RETURN 
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<«« COLORFUL UTILITIES >»» 

MULTI-PAK CRAK 

Save ROMPAKs to your 64K Disk system using tlie RS Multi-Pak Interface. Eliminate constant plugging in of ROMPAKs now by 
keeping all your PAK software on disk . Includes POKES for " PROBLEM " ROMPAKs- including the NEW 16K PAKS! (Demon 
Attack, Dragons Lair, etc) Now CoOo III compatible! (Upgrade $15 w /proof of purchase ) $29.95 

TELEPATCH III 

All the FEATURES of TELEPATCH plus the classically proportioned characters of tile WIZARD with TRUE lowercase! Now CoCo 
III compatible! (Upgrade $15 w/ proof of purchase ) $29.95 

DISK UTILITY 2.1A 

A multi - featured tool for USER FRIENDLY disk handling. Utilize a directory window to selectively sort, move, rename and 
kill file entries. Lightning fast Disk I/O for format , copy and backup. Examine contents of files, the Granule Table, 
plus the size, load addresses and entry points of all programs. Single command execution of both Basic and ML programs. 
32K/64K DISK $29.95 Now also CoCo III compatible! Upgrade only $15 w/ proof of purchase , (see Oct'84 Rainbow Review) 

SPECTRUM FONT GENERATOR 

Write files using any CoCo Word Processor (Telewriter-64, VIP Writer, etc.) and convert them to special Highly Detailed 
character sets ! Some of the sets supported are Italics , Old English , Futuristic and Block . A character set editor is 
included to create or modify custom sets! Supports most dot - matrix printers! DISK $29.95 (see Dec "85 Rainbow Review) 
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COCO III SOFTWARE BONANZA PACKAGE 



Create an instant library of Spectrum Projects TOP CoCo III software! ! I Get FONT BONANZA, FKEYS III, C III GRAPHICS and 
CoCo III UTILITIES (a $100 plus value ) for only $49.95111 

COCO GRAPHIC DESIGNER 

Create custom greetings for any occasion: Birthdays, Anniversaries, Holidays, etc. Also BANNERS S SIGNS ! Includes 
" GRABBER " utility - capture Hi-Res CoCo screens for your GRAPHIC LIBRARY! Easy to use S comes with a set of pre-drawn 
graphics. Includes a screen s font editor. 32K DISK $29.95 

64K DISK UTILITY PACKAGE 

Take advantage of an expanded 64K machine. Make an additional 8K of RAM available by relocating the Ext Basic ROM from 
$8000 to SD800. Copy ROMPAKS to disk (even " protected " PAKS) and create a 32K SPOOL buffer for printing. DISK $24.95 

TAPE/DISK UTILITY 

A powerful package that transfers tape to disk and disk to tape automatically. Does an automatic copy of an entire disk 
of programs to tape. Ideal for Rainbow On Tape to disk. Also copies tape to tape S prints tape S disk directories. 
TAPE/DISK $24.95 (see Sept '83 Rainbow Review) 

COCO III UTILITIES 

Terrific utility support programs for the new Color Computer III ! Includes a CoCo II to CoCo III converter, 32K Hi-Res 
screen saver, 40/80 column Word Processor, RAM tester, DEMO BALI, generator, SMOOTH scrolling demos. 128K DISK $24.95 

THE OS-S SOLUTION 

NOW, a program that creates a " USER FRIENDLY " environment within 0S-9! The OS-9 SOLUTION replaces 19 of the old " USER 
HOSTILE " commands with single keystroke, menu driven commands. No more complex long pathnames or remembering complicated 
syntaxes! Set all XMODE parameters at the touch of keys! $39.95 New LOW price!!! $24.95 ( OS-9 Level II compatible!!!) 

SOFTWARE BONANZA PACKAGE 

Create an instant library of Spectrum Projects TOP Colorful Utility software. Select any of the following 12 programs to 
customize your own SPECTACULAR SOFTWARE BONANZA ! CoCo Checker, Multi-Pak Crak, CoCo Screen Dump, Disk Utility 2.1, 
Spectrum Font Generator, Tape/Disk Utility, Fast Dupe II, 64K Disk Utility, Spectrum DOS, CoCo Calendar, Schematic 
Drafting Processor, OS-9 Solution, Basic Plus, EZ Base or Blackjack Royale (a $300 plus value ) for only $99.95!!! 
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COCO POTPOURRI 

CoCo Checker ....$19.95 Fastdupe III ...$19.95 Spectrum DOS ...$29.95 

MIKEY-DIAL $19.95 GRAPHICOM $24.95 Spit'N'Image ...$34.95 

CoCo Calendar ...$19.95 EZ Base $24.95 CoCo Util II ...$39.95 



All U.S. orders plus $3 S/H (Other $5) 
COD add $2 extra 
NYS Residents add Sales Tax 
CoCo HOT LINE 718-835-1344 HOWARD BEACH IMY 11414 



160 PRINT* J , G$ ; STRING$ (15 , CHR$ ( 2 
24) ) ;G$;STRING$(5,F$) ;G$;STRING$ 
(5 , F$ ) ; G$ ; STRING$ ( 5 , F$ ) ; G$ ; STRIN 
G$(5,F$) ;G$;STRING$(5,F$) ;G$;STR 
ING$(5,F$) ;G$;STRING$(5,F$) ;G$;S 
TRING$(5,F$) ;G$;STRING$(5,F$) ;G$ 
162 RETURN 

170 PRINT#J,CHR$(2 44) ;STRING$(15 
,K$) ;D$;STRING$(5,K$) ; D$ ;STRING$ 
(5,K$) ;D$;STRING$(5,K$) ;D$; STRIN 
G$(5,K$) ;D$;STRING$(5,K$) ;D$;STR 
ING$ ( 5 , K$ ) ; D$ ; STRING$ ( 5 , K$ ) ; D$ ; S 
TRING$ ( 5 , K$ ) ; D$ ; STRING$ ( 5 , K$ ) ; CH 
R$(249) 
175 RETURN 

180 PRINT#J,CHR$(246) ;STRING$(15 
,K$) ;S$;STRING$(5,K$) ;S$;STRING$ 
(5,K$) ;S$;STRING$(5,K$) ;S$;STRIN 
G$(5,K$) ;S$;STRING$(5,K$) ;S$;STR 



ING$(5,K$) ;S$;STRING$(5,K$) ;S$;S 
TRING$(5,K$) ;S$;STRING$(5,K$) ; CH 
R$(247) 
182 RETURN 

499 END 

500 S$=CHR$(248) : D$=CHR$ ( 250) :F$ 
=CHR$(224) :G$=CHR$(245) :GOSUB150 
5 10 F0RX=1T05 : G0SUB1 60 : NEXTX 
515 GOSUB170 

520 F0RX=1T012 : F0RZ=1T05 : GOSUB16 

: NEXTZ : GOSUB170 : NEXTX 

530 FORZ=1TO5:GOSUB160: NEXTZ : GOS 

UB180 

540 PRINT#-2,CHR$(27) ;CHR$(54) :P 

RINT#-2,"Totals> ";CHR$(15) ;HOM 

E$" "AWAY$;CHR$(14) 

550 PRINT#-2 , "Hits>" : PRINT#-2 , "E 

rrors>" : PRINT#-2 , "Runs>" 
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Recipe Printer 

By Keith March 



Here is a nifty little program to help you print out your 
recipes on continuous 3-by-5 file cards. When you run this 
program, it prompts you for the name of your recipe 
(maximum of 41 characters long), then asks you to set the 
margin. The screen will look like this: 



LM 2 



RM 23 



PRESS E TO STOP 

PRESS L TO SET L. MARGIN 

PRESS R TO RUN AGAIN 



Now you can type in the ingredients; press ENTER aftcreach 
one. If you want the ingredients listed on the recipe card in 
two columns, type what you want to go in the left column 
first, then press L and ENTER. The screen should look like 
this: 



LM 25 



RM 49 



PRESS E TO STOP 

PRESS L TO SET L. MARGIN 

PRESS R TO RUN AGAIN 



Roll your printer back to the top of the first ingredient in 
the left column, then type in what you want in the right 



column. After you have finished typing in the ingredients, 
press L, then 3. Your screen should look something like this: 



LM 2 



RM A3 



PRESS E TO STOP 

PRESS L TO SET L. MARGIN 

PRESS R TO RUN AGAIN 



EBB SALAD SANDWICH FI 


-LING 


6 hard-boiled eggs 




1/2 


cup chopped celer 


y 


1/3 


cup iiiayanaise 




1/4 


tsp salt 




Hix 


all ingredients t 


ogether, 


Haki 


5s enough filling 


for about 


5 IK 


sandwiches, 





Now type in the instructions for the recipe and press 
ENTER. 



The listing: RECIPE 

1 ' RECIPE MAKER 

2 ' BY KEITH H. MARCH 

3 ' FOR CONTINUOUS 3X5 FILE CARD 
S 

4 ■ ON THE NX- 10 PRINTER 

5 ■ (C) 12/1/86 

6 CLEAR 2000 
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7 CLS:POKE 150,1 

8 P=-2:P0KE 282,255 

9 PRINT" RECIPE MAKER 

BY 
KEITH MARCH" 

10 PRINT -.LINEINPUT" IS YOUR PRINT 
ER ON (Y OR N) ";D$ 

11 IF D$="N" THEN 7 ELSE CLS : GOT 
12 

12 PRINT#P,CHR$(27) ;"8"; ■ 

PAPER-OUT OFF 

13 LINEINPUT " RECIPE N 
AME (MAX. CHARS. & OR 
SPACES IS 41) : ";R$ 

14 PRINT#P,CHR$(27) ;CHR$(108) ;CH 
R$(l) ; ' LEFT MARGIN 

15 PRINT#P,CHR$(27) ;CHR$(81) ;CHR 
$(49) ; ' RIGHT MARGIN 

16 PRINT#P,CHR$(27) ; "a" ; CHR$ ( 1) ; 
• CENTERED PRINTING 

17 PRINT#P,CHR$(27) ;CHR$(15) ; ■ 

COMPRESSED 

18 PRINT#P,CHR$(27) ;CHR$(104) ; CH 
R$(1);R$' DOUBLE-SIZE 

19 PRINT#P' 

SPACE 

20 PRINT#P,CHR$(27) ;"@"; ' 

RESET 

21 LL=0:RR=0 



22 INPUT " LEFT MARGIN (1, 2 OR 
3 ) " ; LM 

2 3 IF LM=1 THEN LL=2:RR=2 3 

24 IF LM=2 THEN LL=2 5:RR=49 

25 IF LM=3 THEN LL=2:RR=49 

26 PRINT#P,CHR$(27) ;CHR$(108) ; CH 
R$(LL) ; ' LEFT MARGIN 

27 PRINT#P,CHR$(27) ; CHR$(81);CH 
R$(RR) ; ' RIGHT MARGIN 

28 PRINT#P,CHR$(27) ; CHR$(65);CH 
R$(lj3);' LINE-FEED 

29 PRINT#P,CHR$(27) ;CHR$(15) ; « 

COMPRESSED 

30 CLS: POKE 282,0 

31 PRINT§1,"LM";LL,"RM";RR 

3 2 PRINT " PRESS <E> TO STOP" 

33 PRINT " PRESS (L) TO SET L. M 

ARGIN" 

3 4 PRINT " PRESS (R) TO RUN AGAI 

N" 

3 5 LINEINPUT " ";E$ 

36 IF E$="E" OR E$="e" THEN PRIN 
T#P,CHR$(27) ;"@";:CLS:NEW 

37 IF E$="L" OR E$="l" THEN 20 

38 IF E$="R" OR E$="r" THEN PRIN 
T#P,CHR$ (27) ;"§";: GOTO 1 

39 PRINT#P,E$ 

40 GOTO 30 



Auto Economy 

By J.E. Borger 
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The listing: MPG 



At last, everything you always wanted to know about how 
much that car of yours is costing you, but were afraid to ask! 
MPG can figure your average yearly or monthly auto costs, 
and even break it down to cost per mile. 

All you need are approximate costs of yearly insurance, 
maintenance, average price paid for gasoline, monthly car 
payment and number of miles you drive each year. After 
entering this data, CoCo will figure the costs. This is also an 
excellent way to "comparison shop" for a car, since you can 
use this program to figure the cost of any car, not just your 
own. 



MILES 


PE 


R GAL 


_ON 


CDMF 


LITER 


YOUR T 


OY 


OTA T 


£RC[ 


EL CC 


1ST YOUs 


year 1 y 


$ 


2927 


•_p .-,. 






month 1 


y 


$ 243 


.94 






per mi 


1 e 


$ „2 


439- 


T.419/ 


(. 



10 CLS: 'm.p.g. (J. E. BORGER 9/85 



) 



MILES PER GALLON CO 



20 PRINT" 
MPUTER" 

30 FOR L=l TO 64: PRINT"*"; 
40 NEXT L 
50 PRINT#X,"" 

60 PRINT"USE THIS PROGRAM TO FIG 
URE YOUR mpg, (AND A LITTLE BIT M 
ORE! ) 

70 PRINT#X,"" 

80 INPUT " SCREEN OR PRINTER (S 
/P) " ;A$ 

90 IF A$="S"THEN X=0 
100 IF A$="P"THEN X=-2 
110 IF A$="P" THEN PRINT#-2,"MIL 
ES PER GALLON COMPUTER" 
120 CLS 

130 CLS:PRINT@2 24," ALREADY KNOW 
THE MPG? (Y/ )":FOR T=l TO 150: 
NEXT T:PRINT§2 2 4, " ALREADY KNOW 
THE MPG ( /N)":FOR T=l TO 150 :N 
EXTT:I$=INKEY$:IF I$o"Y"AND I$< 
>"N"THEN 130 
140 CLS5 
150 IF I$="Y"THEN 330 ELSE 160 
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160 CLS 

17)3 INPUT"WHAT KIND OF CAR DO YO 

U DRIVE ";C$ 

180 CLS1 

19j3 INPUT "HOW MANY MILES SINCE 

YOUR LAST FILL-UP"; MI 

200 CLS 

210 INPUT "EXACTLY HOW MUCH GAS 

DID IT TAKE TO FILL UP THIS TIME 

" ; GS 

220 PRINT#X,"" 

230 CLS 

240 PRINT#X,"YOU DROVE"MI "MILES 

AND CONSUMED "GS" GALLONS OF GAS 
ii 

250 PRINT#X,"" 

2 60 PRINT#X," THE EXACT mpg 

FOR YOUR " 

270 PRINT#X," "C$" IS "MI/GS 



280 PRINT#X,"" 

290 FOR K=l TO 2000: NEXT K 

300 • 

310 MG=MI/GS 

320 GOTO 3 50 

330 INPUT "MAKE OF CAR";C$ 

340 INPUT"WHAT'S THE MPG";MG 

350 PRINT#X,"" 

3 60 INPUT "HOW MUCH DO YOU NORMA 

LLY PAY FOR GASOLINE (PER GALLON 

)";GG 

370 CLS 



3 80 INPUT"WHAT IS YOUR YEARLY IN 
SURANCE PREMIUM"; IP 

390 CLS 

400 INPUT "HOW MANY MILES (AVG) D 

YOU DRIVE PER YEAR" ;ML 

410 CLS 

420 INPUT"WHAT IS YOUR MONTHLY C 

AR PAYMENT ";CP 

430 CLS6 

440 PRINT"WHAT IS YOUR YEARLY MA 

INTENANCE COSTS?" 

450 INPUT" (TUNE-UP, SERVICE, OIL, T 

IRES ETC. ) " ;YM 

4 60 CLS8 

470 PRINT#X,"" 

480 CLS :PRINT#X, "YOUR "C$" COST 

YOU : " 

490 PRINT#X,"" 

500 PRINT#X,"yearly $";:PRINT#X, 

USING" ####.##»; (YM)+(CP*12)+(IP 

)+( (ML/MG) *(GG) ) 

510 PRINT#X,"" 

520 PRINT#X, "monthly $";:PRINT#X 

, USING" ####.##" ;(YM/12)+(CP)+ (IP 

/12)+( (ML/MG) *(GG/12) ) 

530 PRINT#X,"" 

540 PRlNT#X,"per mile $"((YM)+(C 

P*12) + (IP) + ( (ML/MG) *(GG) ) )/(ML) 

550 PRINT: PRINT: PRINT 

560 INPUT"AGAIN";A$ 

570 IF A$="Y" THEN 10 ELSE PRINT 

#X, "THANK YOU" 
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CoCo Yields 
The Floor 

By Burt Gonce Jr. 

This program calculates the amount of cement necessary 
for any specific job. All you have to do is enter the length 
and width of the form in feet, and the depth in inches. Then, 
presto! CoCo tells you how much cement you need, to pour 
the form. 

The listing: CEMENT 

100 REM****THIS PROGRAM WRITTEN 
BY BURT GONCE, JR. RT 1 BOX 137 

BEAVERDAM, VIRGINIA, 2 3015 
110 REM****198 2 ******** 
120 CLS 
130 'THIS IS A PROGRAM TO FIGURE 



HOW MUCH CEMENT YOU NEED TO POU 
R A SPECIFIC SIZE FORM. . 
140 PRINT@3 2,"THIS IS A PROGRAM 
TO FIGURE THE AMOUNT OF CEMENT T 
HAT YOU WILL HAVE TO ORDER FOR 

YOUR SPECIFIC FORM " 

150 PRINT§192,"ENTER LENGTH AND 

WIDTH OF THE FORM YOU HAVE BUI 

LT IN feet. .":PRINT§2 55," ENTER 

THE DEPTH OR THICKNESS OF YOl.c F 

ORM IN inches. . . " 

160 PRINT@4 87,"ANY KEY TO GO ON' 

:EXEC44539 

170 SOUND 150,1 

180 CLS 

190 L$=»###.##» 

200 PRINT@65,"LENGTH OF FORM IN 

feet "; :PRINT@138," " ; : PRIN 

T@139, ;: INPUT L: SOUND 150,1 

210 PRINT§161, "WIDTH OF FORM IN 

feet. "; :PRINT@ 2 3 5, ;: INPUT W:SO 
UND 150,1 
220 PRINT@257, "THICKNESS OF FOR 
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M IN inches ": PRINTS 3 31, ;: INPUT 

T 

230 

240 

2 50 

2 60 

270 

280 

290 

300 



X=L*12 
Y=W*12 
Z=T/12 

P=L*W 
Q=Z*P 
CLS 
PRINTS 64, ; 

PRINT"*********** * 

********** 

310 PRINT" YARDS OF CEMENT TOO. 



RDER FOR THIS POUR " ; 

3 20 PRINT USING L$;Q/27 

3 30 PRINT"*********** * 

*********" 

340 PRINT§453, "ANY KEY TO DO ANO 

THER" 

350 PRINT§489, "OR q TO QUIT" 

360 EXEC 44539 

370 A$=INKEY$:IF A$="Q"THEN 390 

ELSE 380 

380 GOTO 180 

390 POKE 113,0:EXEC 40999 
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Checks And Balances 

By John Musumeci 

This is a simple program to help balance your bank account 
if you have some pesky outstanding checks. When you run 
the program, it asks for your balance according to the bank 
statement. Then, just enter any outstanding checks, one at 
a time. (There is room for seven.) The program will calculate 
the correct balance for your checkbook. 

The listing: CHECKS 

1 ' *****CHECKS***** 

2 '**************** 

3 '***WRITTEN BY*** 

4 '*JOHN MUSUMECI** 

5 ! **103-57 104 ST* 

6 '**OZONE PARK,*** 

7 i***NEW YORK,**** 

8 i *****H417****** 

9 '**7i8-738 0212** 

10 CLS (4) 

20 PRINTS 172, "CHECKS"; 

30 FOR X=l TO 460*6 

40 NEXT X 

50 CLS 

60 PRINTS 12 8, "WHAT IS STATEMENT 

BALANCE" 

70 INPUT B 

80 FOR X=l TO 460*5 

90 NEXT X 



100 

110 

HECK 

120 

130 

R" 

140 

150 

ER" 

160 

170 

ER" 

180 

190 

ER" 

200 

210 

ER" 

220 

230 

ER" 

240 

2 50 

2 60 

270 

280 

290 

300 

310 

IS: 
320 
330 
340 
350 



CLS 

PRINTS32,"LIST OUTSTANDING C 

OR ENTER" 
INPUT CA 
PRINTS9 6,"NEXT CHECK OR ENTE 

INPUT CB 

PRINTS160,"NEXT CHECK OR ENT 

INPUT CC 

PRINTS2 24,"NEXT CHECK OR ENT 

INPUT CD 

PRINTS2 88,"NEXT CHECK OR ENT 

INPUT CE 

PRINTS352,"NEXT CHECK OR ENT 

INPUT CF 

PRINTS416,"NEXT CHECK OR ENT 

INPUT CG 

FOR X=l TO 460*3 

NEXT X 

CLS 

FOR X= 1 TO 460*5 

NEXT X 

A=B- (CA+CB+CC+CD+CE+CF+CG) 

PRINTS101, "CHECKBOOK BALANCE 
ii 

PRINT S2 68,A 

FOR X-l TO 4 60*30 

NEXT X 

END 



Contributions to "Novices Niche" are welcome from everyone. We like to run a variety of short programs that can be typed 
in at one sitting and will be useful, educational and fun. Keep in mind, although the short programs are limited in scope, many 
novice programmers find it enjoyable and quite educational to improve the software written by others. 

Program submissions must be on tape or disk. We 're sorry, but we do not have the time to key in program listings. All programs 
should be supported by some editorial commentary, explaining how the program works. If your submission is accepted for 



publication, the payment rate will be established and agreed upon prior to publication. 



— Jutta Kapfhammer 
Submissions Editor 
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WISHING WELL 



CoCo Conquers 
the Metric System 



By Fred B. Scerbo 
Rainbow Contributing Editor 



Editor's Note: If you have an idea for 
the " Wishing Well. " submit it to Fred 
c/o THE RAINBOW. Remember, keep 
your ideas specific, and don 't forget thai 
this is BASIC. All programs resulting 
from your wishes are for your use, hut 
remain the property of the author. 



Just when things look darkest, 
someone comes to the rescue! 
That's the way things sometimes 
seem. Well, the "Wishing Well" is no 
exception to that observation. Those of 
you who have followed the column in 
recent months probably know the prob- 
lem I have been facing: a lack of realistic 
and practical wishes from my readers. 
The clatter of my line printer had barely 
subsided after completing my March 
submission, and already I was starting 
to worry about where the April "Wish- 
ing Well" would go. 

The next day's mail helped solve that 
problem as few letters have in the past. 
Not only did the reader's letter bring an 
uplift to my day, but out of it came a 
very practical wish that sends our 
"Wishing Well" into the world of met- 
rics with a new addition to the Life 
Skills Series: The Metric Sys- 
tem — Measuring in Meters. 



Fred Scerbo is a special needs instructor 
for the North Adams Public Schools in 
North Adams, Massachusetts. He holds 
a master's in education and has pub- 
lished some of the first software avail- 
able for the Color Computer through 
his software firm. Illustrated Memory 
Banks. 
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The Letter 

Mr. John A. McGoldrick of Brook- 
lyn. New York, wrote me a letter re- 
ceived at the rainbow offices on Christ- 
mas Eve (how appropriate!). Mr. 
McGoldrick wrote: 

"First, I should like to express my 
sincere gratitude to you and RAINBOW 
for the fine educational programs you 
have been supplying my five children 
who are all in elementary school. I have 
one tape devoted to math programs and 
you can be sure that Number Relation, 
which appeared in this January's RAIN- 
BOW, will join Math Driller and the 
numerous other fine programs which 
have helped my children in learning 
math and in becoming computer liter- 
ate." 

Everyone needs a little positive feed- 
back and Mr. McGoldrick's letter was 
a needed shot in the arm. Some of you 
may recall I have stated that when I 
write an educational program, it is my 
hope that it get the widest possible use 
(short of outright piracy by those who 
would try to resell it). As a teacher of 
special needs students, I take great 
satisfaction in knowing that someone in 
another city has benefited from an 
educational program l was able to list 
in these pages. You can't put a price tag 
on that kind of satisfaction, believe me. 
Mr. McGoldrick continues . . . 

"My seventh grade daughter, 
Theresa, was recently quizzed on the 
metric system and was totally annihi- 
lated, as were her classmates. I checked 
the past two annual indices of RAINBOW 
magazine hoping for a program on the 
metric system which would help my 
daughter. Unfortunately, there was 
none. 



"I think such a program would be 
very beneficial. If the child could learn 
and understand the relationships that 
are developed between the numbers by 
grasping and understanding the 
roots — milli, kilo, etc. — the child could 
be taught that by remembering one 
equivalent he can work out the others. 
Hoping you can implement this idea." 

Now here was an idea I could sink my 
teeth into. Quite honestly, I had never 
even thought of doing the metric system 
because most of my math students never 
get that far. (Even though I teach at the 
high school level, many of my learning 
disabled students have severe math 
problems. Progress is slow, with some 
students only reaching a fourth or fifth 
grade math level.) 

So, my thanks go out to you and your 
family, Mr. McGoldrick. Your sincere 
letter helped dislodge a brief mental 
block. Now let's get down to business. 

Typing in the Program 

LIFE5KLG, as it is listed on both 
RAINBOW ON TAPE and RAINBOW ON 
DISK, is designed to fit in a I6K Color 
BASIC machine without Extended 
BASIC. Those with a I6K Extended 
machine may have to type PCLEAR1 and 
press ENTER before using the program. 
The program will also work on the MC- 
10 with 20K. 

You will also notice I have left out use 
of ELSE in the IF-THEN statements as 
well as the STRINGS command, both of 
which are missing from MC-IO BASIC. 
Since there are no pokes or peeks, no 
changes are required in the listing to 
make it work on either machine. (This 
does not mean you can load a CoCo 
tape of this program directly into the 



NRI Trains You At Home— As You Build Your Own IBM-Compatible Computer 

GET THE KNOW-HOW 

TO SERVICE EVERY 

COMPUTER ON THIS PAGE 



Learn the Basics the NRI 
Way -and Earn Good 
Money Troubleshooting 
Any Brand of Computer 

The biggest growth in jobs 
between now and 1995, 
according to Department of 
Labor estimates, will occur in the 
computer service and repair 
business, where demand for trained 
technicians will actually double. 

You can cash in on 
this opportunity— either as 
a full-time corporate tech- 
nician or an independent 
service-person— once 
you've learned all the 
basics of computers the 
NRI way. NRI's practical 
combination of "reason- 
why" theory and "hands- 
on" building skills starts you 
with the fundamentals of 
electronics, then guides you 
through advanced electronic 
circuitry and on into computer 
electronics. You also learn to program in 
BASIC and machine language, the 
essential languages for troubleshooting 
and repair. 

Total Computer Systems 
Training, Only From NRI 

No computer stands alone. . . it's part of 
a total system. To really service computers, 
you have to understand computer systems. 
And only NRI includes a powerful com- 
puter system as part of your training, 
centered around the new, fully IBM- 
compatible Sanyo 880 Series computer. 

You start with the step-by-step 
assembly of the new, highly-rated, fully 
IBM-compatible Sanyo 880 Series com- 
puter. You install and troubleshoot the 
"intelligent" keyboard. Then you assem- 
ble the power supply, install the disk 
drive, and add extra memory to give you 
a powerful 256K RAM system. You go on 
to experiment with the 88()'s two 
operating speeds: standard IBM speed of 
4.77 MHz and a remarkable turbo speed 
of 8 MHz. 

Finally, you interface the high-resolu- 
tion monitor and begin to use the valuable 
software that's included in your course. 

No Experience Needed, 
NRI Builds It In 

You get practical, hands-on experience 



IBM is a Registered Trademark 
ol IBM Corporation. 

Epson is a Register Dd Trademark ol Epson 
Amenca, Inc. 

Apple and Ihe Apple logo are Registered 
Trademarks o' Applo Computer, Inc 




technical staff, ready to help you when 
you need it. You get it all from NRI! 

100-Page Free 
Catalog Tells More 

Send the coupon today for 
NRI's big, 100-page, color 
catalog on NRI's electron- 
ics training, which gives 
you all the facts about 
, NRI courses in Micro- 
computers, Robotics, 
Data Communications, 
TV/ Audio/Video Serv- 
icing, and other growing 
high-tech career 
fields. If the 
reply coupon 
is missing, 
write to the 
address below. 
NRI Schools, 
McGraw-Hill Contin- 
uing Education Center, 
3939 Wisconsin Avenue, 
Washington, D.C. 20016. 



that gives you the skills you need for 
success. You learn in your own home. 
No classroom pressures, no night 
school, no need to quit your present job 
until you're ready to make your move. 
Your training is backed up by your 
personal NRI instructor and the NRI 




Your NRI 

course 

includes Ihe 

• IBM PC com-. 

paliblo Sanyo 

880 compuler with memory 

expansion to 256K RAM • high-resolution 

monitor • double-density/double-sided disk 

drive • "intelligent" keyboard • NRI Discovery Lab ' 

to teach circuit design and operations • digital 

multimeter ■ logic probe ■ spread sheet • word 

processing software— and more. 



SEND COUPON TODAY FOR FREE NRI CATALOG! 



SCHOOLS 

McGraw-Hill Continuing Education Center 

3939 Wisconsin Avenue. NW, Washington, DC 20016 

We'll give you tomorrow. 

VCHECK ONE FREE CATALOG ONLY 
G Computor Electronic* 

□ TV/AuditWideo Servicing 
[ ] Satellite Electronics 
I Robotics & Incustrial Controls 

□ Data Communications 
D Electrician 



m 



205-047 



For Career courses 
approved under Gl Bill 
L check for details. 



G Industrial Electronics 

G Communication Electronics 

G Electronic Design Technology 

G Telephone Servicing 

D Digital Electronics Servicing 

□ Basic Electronics 

G Bookkeeping 6 Accounting 



G Appliance Servicing 

□ Small Engine Repair 

□ Photography 

D Air Conditioning, Heating & Relngcration 

G Locksmithing & Electronic Security 

_ Building Construction 

G Automotive Servicing 



Name {Please print) 



Age 



Li 



City/Staio'Zlp 



Accredited by Ihe National Home Study Council 
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MC-10. The tokens are different in each 
machine. Only the written listings are 
the same.) 

One thing you will notice about this 
listing as you type it in, is that there are 
many, many DATA statements in it. It is 
very important that you type in these 
DATA statements exactly as you see 
them, even if they do not seem to make 
sense. Every space and every comma 
should line up on your screen exactly as 
they do in the 32-column listing found 
on these pages. 

The program includes a subroutine 
that prevents wordwrap on the senten- 
ces displayed on the screen. Since some 
displays will be charts, it is important 
that you include all the spaces shown in 
the DATA statements. (In fact, I can't 
remember ever writing a program with 
this much data; however, there is a 
reason for this.) 

Please do not send me your listing of 
this program (even with an SASE) 
asking me to debug your typing errors. 
Sorry, I simply do not have the time to 
answer requests such as these and still 
create a new program each month. 

Using the Program 

This program is designed to do two 
things: instruct and quiz. On running 
the program, you will see our familiar 
Life Skills screen and can choose to 
review or quiz the material. Naturally, 
the first time you use it, you should 
press R for review. 

The program then displays quite a 
few screens with instructional material 
regarding relationships and values in 



the metric system, particularly, measur- 
ing with meters. You may proceed 
through each statement by pressing the 
ENTER key. The user is not expected to 
commit this material to memory. It can 
be reviewed a number of times to make 
the child more familiar with these 
values. 

Some of the material will be dis- 
played in chart form because it can be 
more easily understood that way. All of 
the "root" definitions, such as "kilo" 
and "centi" are clearly defined, with 
examples given. I have attempted to 
cover this material in as simple and clear 
a manner as possible. If you want to add 
additional statements to this listing, you 
may insert them between any of my 
DATA statements. However, you must 
always add at least two, or an even 
number of statements. Otherwise, you 
may throw off the remaining data. 

This information is found between 
lines 390 and 515. I have, as a rule, put 
two sentences in each line. Be careful 
not to use any commas in your punc- 
tuation unless you wrap each sentence 
in quotes. For example: 

401 DATA "ONE, TWO AND THREE", 
"FOUR, FIVE AND SIX" 

Notice how a comma is used between 
each set of quotes. Remember, you 
cannot add an odd number of sentences. 
Most of you will not need to add any- 
thing to the program. Anything you add 
will be properly spaced on the screen 
automatically. (In fact, this program 



can almost be used as a programmed 
reader.) 

At the end of the information, the 
screen prints out instructions for the 
quiz part of the program. Here is how 
the quiz works. 

Two values are printed on the screen, 
such as: 

A) 2 MILLIMETERS 

B) 20 METERS 

You must choose the larger value, by 
pressing either A or B. The screen will 
indicate whether or not your answer is 
correct and will highlight the correct 
answer. Press ENTER to move on to the 
next example. 

Pressing the @ key at any time gives 
you the scorecard. It displays our usual 
quiz data, and gives you the choice to 
continue by pressing C, to quit by 
pressing N for no, or to run the whole 
program again by pressing Y for yes. 
The student can use the program as long 
as you want. The two values will never 
be equal, so you do not have to worry 
about that problem coming up. 

Conclusion 

I hope many other families will find 
this kind of educational program useful. 
I hope to do several more involving 
skills in using the metric system. How- 
ever, I always welcome suggestions that 
are as helpful as Mr. McGoldrick's. 
Maybe you can come up with some of 
your own, as well. □ 
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The listing: LIFESKLS 



10 

15 
20 
25 

30 
35 
40 
45 
50 



REM* ************************* 
REM* LIFE SKILLS MATH DRILL * 



REM* THE METRIC SYSTEM 
REM* MEASURING IN METERS 
REM* BY FRED B.SCERBO 
REM* 60 HARDING AVE 
REM* NORTH ADAMS, MA 01247 
REM* COPYRIGHT (C) 1987 
REM* ************************* 

55 CLS0 : F0RI=1T03 2 : PRINTCHR$ (188 

) ? : NEXT 



60 FORI=1TO192:READA:IFA=0THENA= 

16 

65 PRINTCHR$(A+128) ; :NEXT 

70 FORI=lT03 2 : PRINTCHR$ (179) ; : NE 

XT 

75 DATA109,104,96,109,104,100,11 

0,108,106,109,108,109, ,,30,28,26 

,29, , ,30,20,30,20,30,16,20,30, ,2 

1,28,29 

80 DATA101, , ,101, , ,106,96,104,10 

1, ,100, , ,26, ,24,21,16,22,16, ,26, 

,26, ,16,26, ,21, ,20 

85 DATA101, , ,101, , ,107,106,96,10 

1,99,98, , ,27,19,18,21,22,16, , ,26 

, , 26, , 16, 26, ,21, 19, 19 

90 DATA101, , ,101, , ,106,104, ,101, 

,,,,, ,26,21,20,18, , ,26, ,26, ,16,2 

6 ? 1 

95 DATA101, ,106,101, , ,106, , ,101, 

,97, ,16,26, ,26,21, ,20,18, ,2 6, ,26 

,21,16,26,21,21, ,21 
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100 DATA103, 99, 106, 103, 98, 97, 107 
,,,103,99,1)33, , ,27,19,26,23,18,, 
27,17,2 7,17,27,2 3,17,2 7,2 3,21,19 
,23 

105 PRINT@293," THE METRIC SYST 

EM " ; 

110 PRINT63 25," MEASURING IN MET 

ERS " ; 

115 PRINT@357," BY FRED B.SCER 

BO " ; 

120 PRINT@389," COPYRIGHT (C) 1 

987 "; 

125 PRINT@453," (R) EVIEW OR (Q) 

UIZ " ; 

130 DIMA$(50) ,B$(50) ,C(7) 

135 Q=143:F0RI=1T07:C(I)=Q+(I*16 

) :NEXT 

140 F0RI=1T07 : READP$ ( I ) , P ( I ) : NEX 

TI 

14 5 DATA MILLIMETERS, 1,CENTIMETE 

RS , 1,0 , DECIMETERS , 100 , METERS , 1/30)3 

, DECAMETERS , 10000 , HECTOMETERS , 10 

0000 , KILOMETERS , 100)30010 

150 SW=30 

155 GOTO190 

160 IF LEN(JK$)<=SW THEN180 

165 FOR T=SW TO 0STEP-1:IF MID$ ( 

JK$,T,1)=" "THEN175 

170 NEXT T:GOTO180 

175 L$=LEFT$(JK$,T) : W$=L$ : GOSUB1 

85:JK$=" "+RIGHT$(JK$, (LEN(JK$ 

) )-T) :GOT016)3 

180 W$=JK$:PRINTW$: RETURN 

185 PRINTW$: RETURN 

190 FORJ=1TO50:READ A$(J),B$(J): 

IF A$(J)="END" THEN200 

195 NEXT J 

200 X$=INKEY$:IFX$=""THEN200 

205 IFX$="R"THEN220 

210 IFX$="Q"THEN255 

215 MU=RND ( -TIMER) :GOTO200 

220 CLS0:FORI=1TOJ-1:C=RND(7) :FO 

RY=1T032:PRINTCHR$(C(C) ) ; :NEXTY: 

PRINT@64,""; :JK$=" "+A$(I) : GOS 

UB160 

225 F0RY=1T032 : PRINTCHR$ (128) ; :N 

EXTY:F0RY=1T03 2 : PRINTCHR$ (C(C) ) ; 

: NEXTY : F0RY=1T03 2 : PRINTCHR$ ( 128 ) 

; : NEXTY 

230 IFINKEY$<>CHR$(13)THEN2 30 

235 JK$=" M +B$(I) :GOSUB160 

240 F0RY=1T032:PRINTCHR$(128) ; :N 

EXT:F0RY=1T03 2:PRINTCHR$ (C(C) ) ; : 

NEXTY 

245 IFINKEY$<>CHR$(13)THEN245 

2 50 CLS0:NEXT 

255 CLS0:N(1)=RND(7) 

2 60 N ( 2 ) =RND ( 7 ) : IFN ( 2 ) =N ( 1 ) THEN2 



60 

2 65 C=RND ( 7 ) : : F0RI=1T03 2 : PRINTCH 
R$(C(C) ) ; :NEXTI:F0RI=1T03 2: PRINT 
CHR$(12 8) ; :NEXTI: PRINT 

270 PRINT" WHICH OF THESE IS G 

REATER ?" 

275 V=RND(9) : NN (1) =P (RND (4 ) )*V:N 

N(2)=P(RND(4) ) *V 

280 NV(1)=P(N(1) )*NN(1) :NV(2)=P( 

N(2) ) *NN(2) :IFNV(1)=NV(2)THEN275 

285 PRINT:PRINT" A) ";NN(1); 

P$(N(1)) 

290 PRINTrPRINT" B) ";NN(2); 

P$(N(2) ) : PRINT 

295 IFNV(1)>NV(2)THENR$="A" 

300 IFNV(2)>NV(1)THENR$="B" 

305 F0RI=1T03 2 : PRINTCHR$ (128) ; :N 

EXTI : F0RI=1T03 2 : PRINTCHR$ (C (C) ) ; 

: NEXTI : F0RI=1T03 2 : PRINTCHR$ ( 128 ) 

; : NEXTI 

310 X$=INKEY$:IFX$=""THEN310 

315 IFX$="@"THEN520 

320 IFX$="A"THEN335 

325 IFX$="B"THEN335 

3 30 GOTO310 

335 IFX$=R$THEN345 

3 40 PRINT" SORRY, BUT THAT IS N 

OT RIGHT! ":NW=NW+l:GOT03 50 

345 PRINT" YES, YOUR ANSWER IS 

CORRECT ! " : NC=NC+1 

350 F0RI=1T032:PRINTCHR$(128) ;:N 

EXT:F0RI=1T03 2:PRINTCHR$(C(C) ) ; : 

NEXT 

355 IFR$="A"THEN LC=161 

360 IFR$="B"THEN LC=225 

3 65 X$=INKEY$ 

370 PRINT@LC, ")=>"; : FORI=1TO50 : N 

EXTI : PRINT@LC , " " ; : FORI=1TO50 : 

NEXTI 

375 IFX$="§"THEN520 

380 IFX$=CHR$ (13)THEN255 

385 GOT0365 

3 90 DATA OUR CENTRAL UNIT OF MEA 

SURE IN THE METRIC SYSTEM IS CAL 

LED THE METER., IT IS EQUAL TO 39 

.37 INCHES 

3 95 DATA ONE METER IS ALSO EQUAL 

TO 3.2 8 FEET., ONE METER IS ALSO 

EQUAL TO 1.09 YARDS. 
400 DATA MOST COUNTRIES IN THE W 
ORLD OTHER THAN THE UNITED STATE 
S USE THE METRIC SYSTEM., THE MET 
RIC SYSTEM IS EASY TO USE BECAUS 
E ALL MEASURING UNITS ARE IN POW 
ERS OF TEN (10) . 
405 DATA NOW WE WILL LOOK AT THE 

DIFFERENT UNITS WHICH MAKE UP T 
HE METRIC SYSTEM., WE WILL DEAL O 
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NLY WITH UNITS OF LENGTH BASED 
N THE METER. 

410 DATA WE CAN DIVIDE A METER U 
P INTO TEN ( 10 ) EQUAL PARTS . , EAC 
H ONE OF THESE PARTS IS CALLED A 

DECIMETER. 
415 DATA THE ROOT ' DECI ' MEANS ■ 
ONE-TENTH' SO A DECIMETER IS ONE 
-TENTH OF A METER., THERE ARE TEN 

(10) DECIMETERS IN A METER. 
420 DATA WE COULD ALSO DIVIDE A 
METER UP INTO ONE HUNDRED (100) 
EQUAL PARTS . , EACH ONE OF THESE P 
ARTS IS CALLED A CENTIMETER. 

4 25 DATA THE ROOT 'CENT' MEANS ' 
ONE-HUNDREDTH' SO A CENTIMETER I 

5 ONE-HUNDREDTH OF A METER., THER 
E ARE ONE HUNDRED (100) CENTIMET 
ERS IN A METER. 

4 30 DATA WE COULD ALSO DIVIDE A 
METER UP INTO ONE THOUSAND (1000 
) EQUAL PARTS . , EACH ONE OF THESE 

PARTS IS CALLED A MILLIMETER. 
4 35 DATA THE ROOT 'MILLI' MEANS 
'ONE-THOUSANDTH' SO A MILLIMETER 

IS ONE-THOUSANDTH OF A METER., T 
HERE ARE ONE THOUSAND (1000) MIL 
LIMETERS IN A METER. 

4 40 DATA LET'S LOOK AT THE RELAT 
IONSHIPS BETWEEN THESE UNITS., 1 

METER = 10 DECIMETERS 1 METER 
= 100 CENTIMETERS 1 METER = 10 
00 MILLIMETERS 

445 DATA WE CAN CHANGE METERS (M 
) TO DECIMETERS (DM) BY MULTIPLY 
ING BY TEN (10) . ,5 M X 10 = 50 D 
M 
450 DATA WE CAN CHANGE DECIMETER 

5 (DM) TO CENTIMETERS (CM) BY MU 
LTIPLYING BY TEN (10)., 7 DM X 10 

= 70 CM 
455 DATA WE CAN ALSO CHANGE CENT 
IMETERS (CM) TO MILLIMETERS (MM) 

BY MULTIPLYING BY TEN (10)., 4 C 
M X 10 = 40 MM 
4 60 DATA WE HAVE UNITS WHICH ARE 

LARGER THAN A METER . , TEN ( 10 ) M 
ETERS IS KNOWN AS A DECAMETER. 
4 65 DATA THE ROOT 'DECA' OR ' DEK 
A' MEANS TEN. , DECAMETER OR DEKAM 
ETER MEANS TEN METERS. 
470 DATA THE ROOT ' HECTO ' MEANS 
ONE HUNDRED ( 100) ., HECTOMETER ME 
ANS ONE HUNDRED METERS. 
475 DATA THE ROOT 'KILO' MEANS 
NE THOUSAND., A KILOMETER IS EQUA 
L TO ONE THOUSAND (1000) METERS. 
480 DATA TO FIND HOW MANY METERS 



IN A NUMBER OF DECAMETERS SIMPL 

Y MULTIPLY BY TEN (10)., 5 DECAMT 
ERS X 10 EQUALS 50 METERS. 

485 DATA TO FIND HOW MANY METERS 
IN A NUMBER OF HECTOMETERS SIMP 

LY MULTIPLY BY ONE HUNDRED (100) 

. , 7 HECTOMETERS X 100 EQUALS 700 
METERS 

490 DATA TO FIND HOW MANY METERS 
IN A NUMBER OF KILOMETERS SIMPL 

Y MULTIPLY BY ONE THOUSAND (1000 
) . , 3 KILOMETERS X 1000 EQUALS 30 
00 METERS. 

49 5 DATA HERE IS A COMPARISON CH 
ART. , KILOMETER = 1000 METERS 
HECTOMETER = 100 METERS DECAM 
ETER = 10 METERS METER 

1 METER DECIMETER = 
1/10 METER CENTIMETER = 1/100 
METER MILLIMETER = 1/1000 METER 
500 DATA HERE IS A BRIEF QUIZ AB 
OUT WHAT WE HAVE JUST COVERED., Y 
OU WILL BE GIVEN TWO METRIC VALU 
ES ON THE SCREEN. 

505 DATA YOU WILL BE ASKED TO PI 
CK THE VALUE WHICH IS GREATER., S 
IMPLY PRESS THE LETTER (A) OR (B 
) NEXT TO YOUR CHOICE. 
510 DATA YOU MAY STOP THE QUIZ A 
NYTIME BY PRESSING THE <@> KEY., 
PRESS <ENTER> TO BEGIN THIS SHOR 
T METRIC QUIZ. 
515 DATA END, END 

520 CLS: PRINT!? 101, "YOU TRIED"NC+ 
NW'PROBLEMS &" : PRINT@165 , "ANSWER 
ED"NC"CORRECTLY" 

525 PRINT@229, "WHILE DOING"NW"WR 
ONG." 

530 NQ=NC+NW:IF NQ=0THEN NQ=1 
535 MS=INT(NC/NQ*100) 
540 PRINT@293,"YOUR SCORE IS"MS" 

%." 

545 PRINT@357, "ANOTHER TRY (Y/N/ 

c) ?"; 

550 X$=INKEY$:IFX$="Y"THEN RUN 

555 IFX$="N"THENCLS:END 

560 IFX$="C"THEN255 

565 GOTO550 
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XTERM 

OS-9 Communications program. 

■ Menu oriented ■ Definable macro keys 

• Upload/download. Ascii • Works with standard serial port. RS232 

or XMODEM protocol PAK, or PBJ 2SP Pack, Includes all drivers. 

• 1-xcculc OS-9 commands ■ Works with standard screen. XSCREEN, or 
from within XTERM WORDPAK 80 column board. 

$49.95 with source $89.95 



■ :: : : : : 



XMENU 



Creates a menu driven environmcnl for OS-9- 

• ^t^^WORDPAT^PAK 
$29.95 withsourcc$59.95 



XSCREEN 

OS-9 hi-rcs screen 
• 5 1 /64/8S chars per line • Easy menu operation 

$19.95 with source $39.95 



XDIR & XCAL 



ilicrarchial directory 

• Full sorting 

• Complete pattern matching 



OS-9 calculator 

• Decimal, Hex, Binary 

.+,-,•./, AND.OR, XOR, NOT 



$24.95 with source $49.95 



XDIS 

OS-9 disassembler 
$34.95 with source $54.95 
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XWORD 

OS-9 word processing system 

■ Works with standard text screen, XSCREEN, WORDPAK, or O-PAK 

• True character oriented full screen editing 

• Full block commands 

■ Find and Replace commands 

■ Execute OS-9 commands from within 

■ Proportional spacing supported 

■ Full printer control, character size, emphasized, italics, 
ovcrstrikc, underline, super/sub- scripts 

• 10 header/foolers 

■ Page numbering in decimal or Roman numerals 

• Margins and headers can be set different for even and odd pages 

$69.95 with source $124.95 

XMERGE 

Mail merge capabilities for XWORD 
)£4.9>) with source $4 9. 9 5 

XSPELL 

OS-9 spelling checker, with 20000 and 40000 word dictionaries 

$39.95 
XTRIO 

XWORD/XMERGE/XSPHX 
$1 1 4.95 with XWORD/XMERGFsourc*1 99.95 

XED 

OS-9 full screen editor 
$39.95 with source $79.95 
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SMALL BUSINESS ACCOUNTING 

This sales-based accounting package is designed 
for the non- accounting oriented businessman. It 
also contains the flexibility for the accounting ori- 
ented user to set up a double entry journal with an 
almost unlimited chart of accounts. Includes Sales 
Bntry, transaction driven Accounts Receivable and 
Accounts Payable, Journal Entry, Payroll Disburse- 
ment, and Record Maintenance programs. System 
outputs include Balance Sheet, Income Statement, 
Customer and Vendor status Reports, Accounts 
Receivable and Payable Aging Reports, Check Reg- 
ister, Sales Reports, Account Status Lists, and a 
Journal Posting list. $79 95 

INVENTORY CONTROL/SALES ANALYSIS 

This module is designed to handle inventory control, 
witli user defined product codes, and produce a detailed 
analysis of the business' sales and the sales force. One 
may enter/update inventory data, enter sales, run five 
sales analysis reports, run five inventory reports, set up 
product codes, enter /update salesman records, and 
update the SBAP inventory. $59.95 



PAYROLL 

Designed for maintaining personnel and payroll 
data for up to 200 hourly and salaried employees 
with 8 deductions each. Calculates payroll and tax 
amounts, prints checks and maintains year-lo-date 
totals which can be automatically transferred to the 
SBA package. Computes each pay period's totals 
for straight lime, overtime and bonus pay and det- 
ermines taxes to be withheld. Additional outputs 
include mailing list, listing of employees, year-io- 
datc federal and/or stale lax listing, and a listing of 
current misc. deductions. Suited for use in all stales 
except Oklahoma arid Delaware. $59 95 



These programs arc user friendly and menu 
driven. Sample transactions are included. Each 
package features a hi-rcs screen. Each requires 
a printer, a minimum of 32k and at lean 1 disk 
drive. 



ACCOUNTS RECEIVABLE 

Includes detailed audit trails and history reports 
for each customer, prepares invoices and monthly 
statements, mailing labels, aging lists, and an alpha- 
betized customer listing. The user can define net 
terms for commercial accounts or finance charges 
for revolving accounts. This package functions as a 
standalone A/R system or integrate with the Small 
Business Accounting package. $59 95 



ACCOUNTS PAYABLE 

Designed for the maintenance of vendor and A/1* 
invoice files. The system prints checks, voids 
checks, cancels checks, deletes cancelled checks, 
and deletes paid A/P invoices. The user can run a 
Vendor List, Vendor Status report, Vendor Aged 
report, and an A/P Check Register. This package 
can be used either as a standalone A/P system or 
can be integrated with the Small Business 
Accounting Package $59.95 



MICROTECH 

CONSULTANTS 

INC 



1906 Jerrold Avenue 
St. Paul, MN 55112 




Ordering Information 

Add $3.00 shipping & handling, MN residents add 6% sales tax. 
Visa, Mastercard. COD (add S2.50). personal checks. 
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Author Submiiaiomt ncctpitJ 
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(612) 633-6161 
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Practical information on 
protecting your work 



Computer Program Copyrights: 
A How-to Guide 



By Edward Samuels 



You've written a nifty computer 
program, you're proud of it, and 
you're thinking of contacting a 
software house to see if you can sell it. 
What should you do to protect your 
rights in the program? 

Although other avenues of legal 
protection may be available, your most 
effective protection will probably be 
under the federal copyright law. Under 
that law, you have several "exclusive 
rights," including the exclusive rights to 
make copies of your program and to 
distribute copies to the public. As a 
practical matter, anyone may make 
copies of your work or distribute copies 
to others. However, as a legal matter, 
you have the right to sue them for 
damages if you learn that they have 
"infringed" any of your exclusive rights, 
and to get a court injunction to force 
them to discontinue their infringing 
activities. 

Your copyright, although intangible, 
is like property, in that you can sell it 
to other people. Or you can license 
other people to copy and distribute your 
work for a royalty fee. Your copyright 
generally continues until 50 years after 
your death, so that your heirs will 
theoretically benefit from your rights. 

Edward Samuels, a professor of law at 
New York Law School, has taught 
copyright and other legal subjects for 
more than 10 years. An avid reader of 
RAINBOW. Professor Samuels enjoys 
sharing his CoCo with his children. 8- 
vear old Richard and 4-vear old Claire. 



How do you get this wonderful legal 
protection? It's actually very simple, 
although what you have to do depends 
to some extent on what you intend to 
do with your program. If you simply 
plan to use your program at home or at 
work, without distributing it to others, 
you really don't have to do anything. 
Federal copyright protection is auto- 
matic, and begins from the moment you 
make a copy of your work. If someone 
sneaks into your home and steals a copy 
of your program and starts selling it 
(assuming you can prove that's what 
they did, which is not necessarily easy 
to do), then you have the right to sue 
them to recover for any damages they 
have caused. You need not have done 
anything to "get" your copyright, be- 
cause you had it all along. 

When you start distributing your 
work to other people, you do need to 
write on all such copies a copyright 
notice, which should look like this: 
"Copyright© 1987 by Edward Samuels" 

— substituting your own name and the 
date of first publication of your pro- 
gram. If, for example, you make your 
program available to others through a 
computer network, or give it to friends, 
this simple notice informs everyone that 
you retain all rights of copyright, and 
that you may sue them if they infringe 
your exclusive rights by making or 
distributing copies without your per- 
mission. Since it's so easy, and since it's 
absolutely free, you should make a 
habit of always writing the magic words 

— Copyright© (date of publication) 
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(your name) — at the beginning of all 
your computer programs. 

One more thing you can do to protect 
your rights is register your computer 
program with the copyright office. This 
registration is accomplished by filling 
out the appropriate form and sending it, 
with a copy of your program and a S10 
registration fee, to the copyright office 
in Washington. Such registration is nor 
a prerequisite to copyright protection, 
but it does enhance your rights to some 
extent. You probably need to register 
only if you plan to sell the program 
commercially, but it's up to you to 
decide if you want to go to the slightly 
greater trouble to more fully protect 
your rights. 

In the following sections of this 
article, 1 will explain in greater detail the 
few simple steps we have just outlined 
— obtaining your copyright (automat- 
ically), including the magic words of 
copyright notice in your program when 
you publish it, and, if you decide to do 
it, registering your work. In the final 
section, we will briefly consider just a 
few basic copyright principles that, alas, 
may limit your copyright in significant 
ways. 

Some of these principles may be hard 
to understand. But the beauty of the 
copyright law is that it may be used even 
by people who don't fully understand 
how it works! The car, the television 
and the VCR are great inventions pre- 
cisely because they can be used even by 
people who don't know how they work. 
(To some extent, this is true of comput- 
ers, though I've never been able to 
convince my father of this.) If you can 
drive a car without being a mechanic, 
you can have a copyright without being 
a lawyer. Just as you wouldn't set out 
on a long trip without having a me- 
chanic check out your car, you 
shouldn't get into the business of selling 
programs without consulting an attor- 
ney. But for the casual writer of pro- 
grams, getting the copyright is not all 
that difficult. 

When Copyright Protection Starts 

Everything I am about to say is 
governed by the Copyright Act of 1976 
(which I will call "the Act"), so it may 
not apply to works created before 
January I, 1978, the effective date of 
that act. This is federal law, so it is 
uniform throughout the United States 
and not subject to state variation. If you 
live in or plan to publish the work in 
another country, then obviously you 
need to consult the law of that country. 



Federal copyright in a computer 
program begins as soon as the program 
is "fixed in any tangible medium of 
expression." This means it is protected 
when it has been incorporated into a 
"material object," such as a printed 
listing, or a tape or disk copy. I will 
assume that other CoCo users are at 
least as paranoid as I am, and make 



domain; once a work is in the public 
domain, it can never be retrieved by the 
author. Therefore, it is best always to 
use the copyright notice, since it costs 
you nothing to add it. (I assume that 
you do not intentionally use the notice 
to claim copyright in works which you 
did not write, because if you do that you 
may be subject to criminal penalties.) 



"If you can drive a car without 
being a mechanic, you can have a 
copyright without being a lawyer. " 



multiple saves and listings of all pro- 
grams, so that this prerequisite to 
federal copyright protection shouldn't 
be a problem. If you are the rare person 
who trusts your creation to the insides 
of your temperamental CoCo, without 
making at least one copy, then an 
attorney is not the only professional you 
need to consult! 

Copyright Notice 

Although federal copyright protec- 
tion of a computer program is auto- 
matic as soon as the programmer makes 
a physical copy of it, there is an impor- 
tant requirement when the work is 
published (that is, when you distribute 
it or even offer to distribute it to others, 
whether in a magazine, via a bulletin 
board, or by individual copies). At such 
time, the copyright notice generally 
must be written upon all those publicly 
distributed copies. It is obviously easiest 
to assure this by placing the copyright 
notice on all copies, whether they are 
intended for publication or not. 

There is, under the current law, a 
"savings" provision for protecting 
certain works that may have been pub- 
lished without the appropriate notice, 
by registering the work within five years 
of first publication and adding the 
notice to subsequently distributed co- 
pies. However, it is unwise to rely upon 
the savings provision, since it may lose 
you some rights against persons who 
make copies without knowing that you 
claim rights in the work. 

Once a work is published without 
notice, and once the five years for 
invoking the savings provision have 
passed, the work will go into the public 



Form of the Notice 

The copyright notice requires three 
things: I) the symbol © (the letter *C in 
a circle), the word "Copyright," or the 
abbreviation "Copr."; 2) the year of first 
publication of the work; and 3) the 
name of the owner, or an abbreviation 
or designation by which the owner is 
known. For the first part of the notice, 
you really should try to use both the 
word copyright and the 'C in a circle. 
The symbol is necessary in order to 
trigger international protection under a 
treaty the United States has signed with 
most other major countries. As the 
symbol is not a standard character on 
the CoCo or on most printers, you 
should either design your own character 
for display on a high resolution screen 
and for printing on your printer, or add 
the circle to your listings by hand. Many 
computer programmers use parentheses 
— (c) — but it is not clear that this has 
any significance under the treaty that 
governs the United States' copyright 
relations with most other countries. 

The second part of the notice, the 
year of first publication, refers to the 
year that the work was first made 
available to others by any means. If you 
are in doubt — if, for example, you 
showed a listing to several friends in 
your local computer club in 1985, but 
didn't sell copies of the program until 
1987 — then it is safer to use the earliest 
possible date. If you pick a year that is 
later than that in which you technically 
"published" the work, your copyright 
notice might be ineffective. 

You will normally be the copyright 
owner, and should use your own name 
in the notice. If you wrote the program 
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in the course of your work for someone 
else, or for a company, then that person 
or company may be the copyright 
owner. If so, they probably have a 
standard procedure for placing copy- 
right notices on their works. If some 
other person or company is distributing 
your copyrighted computer program, it 
is advisable to provide in writing (saving 



ter, the publication's copyright notice at 
the beginning of the issue will also 
protect your individual program. Un- 
less you specifically transfer your copy- 
right in the program to the magazine or 
newsletter, it will be presumed that you 
remain the copyright owner, and that 
the magazine acquired only a limited 
right to reproduce the work as part of 



"It's awfully nifty getting an official 
certificate of registration from the 
copyright office, formally certifying 
your authorship of the program. " 



a copy, of course) a statement that, as 
a condition of your authorization to 
distribute copies of the' work, the work 
must contain the required notice. Then, 
if the notice is accidentally omitted, 
your copyright will not be invalidated. 

Position of the Notice 

The copyright notice, in the form just 
described, should be placed in such a 
way as to give reasonable notice to 
others. There are at least three likely 
places where you can put the notice, and 
I would recommend using all three. The 
first is in the listing of the program, 
preferably near the beginning. This is 
most easily accomplished using a num- 
bered line with REM or ' (apostrophe) 
followed by the copyright notice, as 
follows: 

10 REM Copyright ©1987 
by Edward Samuels 

Even if you encode the program so that 
it cannot be easily listed, or you write 
your program in assembly language, it 
should contain the copyright notice 
embedded within it, so that someone 
copying the program will copy the 
notice, or someone disassembling it will 
find it. 

The second logical place to put the 
notice is on the CoCo screen when the 
program is run, most logically as part 
of the sign-on or title screen. The third 
place to put the notice is on the labels 
attached to the tapes or disks on which 
the program is stored, if the program is 
publicly distributed on tapes or disks. 

If you are submitting a program for 
publication by a magazine or newslet- 



thal particular issue or another issue in 
the same series. If, however, you sign a 
contract transferring your program 
copyright to the magazine or newsletter, 
make sure you are satisfied with what 
you're paid because after you sell it, the 
work is no longer yours. 

Copyright Registration 

So, as we have just seen, a computer 
program is protected from the moment 
it is written down or stored, without any 
formalities whatsoever. If and when you 
distribute copies of the work, you must 
affix the copyright notice to it — a 
relatively simple procedure. In addi- 
tion, you may register your work with 
the copyright office, but it is not neces- 
sary to do so in order to be protected 
by copyright. Why, then, would you 
ever want to go to the trouble of reg- 
istering your work? The answer is that 
you obtain several distinct advantages 
through registration — most of which 
assume that your work is "worth" 
something, and that you may someday 
want to sue someone who copies or 
distributes your program without your 
permission. 

Advantages of Registration 

The major advantages of registration 
are the following: 

1) Registration tends to prove that 
you wrote your program when you say 
you did. This could be indispensable if 
you sue someone who claims that he or 
she wrote the program first, and that 
you're the one who copied. 

2) Even if you don't register your 
work, you will be able to recover for any 



damages caused by someone else's 
unauthorized copying of your work. 
Such damages are often hard to prove, 
and won't include your attorney's fees, 
which could easily cost more than your 
provable damages. If you do register, 
however, you qualify to recover not 
only reasonable attorney's fees if you 
win your suit, but also something called 
"statutory damages," meaning that a 
judge can award you a monetary recov- 
ery even if you can't prove specific 
damages. 

3) If you should accidentally omit the 
copyright notice from some published 
copies of your work, registration of the 
work within five years of publication 
will help you save the copyright from 
being invalidated. 

4) In any event, you must register a 
work before you sue for infringement. 

5) It's awfully nifty getting an official 
certificate of registration from the 
copyright office, formally certifying 
your authorship of the program. 

How to Register a Work With 
the Copyright Office 

Assuming you want to go to the 
trouble of registering, it is really not all 
that difficult. First, you obtain Form 
TX by calling the "Forms Hotline" at 
(202) 287-9100 day or night, or writing 
to Information and Publications Sec- 
tion, LM-455, Copyright Office, Li- 
brary of Congress, Washington, D.C. 
20559. While you're at it, ask for Cir- 
culars R I (on copyright basics) and R6 1 
(on computer programs in particular). 
Don't panic when you see that the form 
is for a "nondramatic literary work." 
Under the copyright registration sys- 
tem, that's the category that computer 
programs fall into. If you want to 
separately register the audiovisual 
display of your program, you should do 
so on Form VA, which is for a work of 
the visual arts. (I will not go into the 
protection of audiovisual displays, 
except to mention that in some cases it 
has proven effective in protecting the 
presentation of materials on the screen, 
primarily audiovisual games.) 

Follow the instructions for complet- 
ing and returning the form to the copy- 
right office. Your application must be 
accompanied by a $10 payment and by 
a deposit of one or two copies of the 
program. If you publish a listing of the 
program, you should include two copies 
of the program as published. If the 
program is unpublished, or if you 
distribute copies of your program only 
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on cassettes or disks, then you should 
send one copy of the program "in 
visually perceptible form" — that is, as 
listed to a printer. 

If your program is written in assem- 
bly code, the copyright office wants the 
source code, not merely the unintelligi- 
ble object code. This may result in 
disclosing what you might regard as a 
trade secret. For this reason, many 
computer software companies have not 
generally registered their works, instead 
preferring to preserve their "trade 
secrets" under theories of law other than 
copyright. If you have distributed a 
work written in BASIC, you would nor- 
mally have no expectation that your 
code represents a secret, so you might 
as well register and deposit your work. 
If you have distributed your program 
using limited protection schemes such 
as auto-loaders or programs that pre- 
vent listing, and you honestly think that 
a good programmer wouldn't be able to 
list your program anyway, you might 
decide not to register. 

The copyright office allows the au- 
thors of long programs to deposit only 
portions of those programs, and has 
proposed the adoption of rules that 
would also allow the authors of short 
programs (25 pages or less) to withhold 
up to 50 percent of their listing. The rule 
may well go into effect sometime in 
1987. 

Other Copyright Basics 

There are numerous copyright prin- 
ciples that have the effect of limiting 
your rights in your computer program. 
Although these limiting principles are 
too complex to explain fully in this 



short article, 1 should at least mention 
some of the more important ones. 

For example, the copyright law pro- 
tects only the parts of your program 
that are "original." This doesn't mean 
that the program has to be particularly 
creative or innovative, but it must be the 
result of your own programming. If you 
copy a program listing from RAINBOW 
magazine, it isn't your computer pro- 
gram, and you cannot claim any rights 
in it. 

Similarly, if you use someone else's 
subroutine for writing letters on a 
PMODE A screen, you can't claim author- 
ship of that subroutine either. If you 
develop your own subroutine and char- 
acter set, then that's sufficiently original 
to qualify for copyright protection, even 
though something similar may have 
been done dozens of times by others. 
Original, in short, means little more 
than "not copied." 

Your copyright is said to protect your 
"expression," but not your "idea." 
Other people are free to write programs 
that do the same thing as yours, so long 
as they don't copy your specific pro- 
gram. For example, your copyright in 
a program for solving Rubik's Cube 
won't prevent other people from writing 
programs that solve Rubik's Cube, so 
long as their programs don't copy your 
program. Several recent court decisions 
indicate that the copyright in a comput- 
er program is fairly broad, and not 
limited to verbatim copying of copy- 
righted programs. However, drawing 
the fine line between the protected 
"expression" and the unprotected 
"idea" can sometimes be quite tricky. 

Purchasers of a particular copy of a 



copyrighted computer program have 
the right to resell that particular copy. 
Purchasers may also make a back-up 
copy (assuming they are able to make 
one, if it is copy-protected) or even an 
adaptation that is "an essential step in 
the utilization of the computer program 
in conjunction with a machine." For 
example, a modification to a program 
written for the CoCo 2 to get it to run 
on a CoCo 3, or the elimination of the 
speed-up poke to get it to run on a CoCo 
that won't handle it, would presumably 
not be considered an infringement of 
the owner's copyright. 

And, of course, no matter what the 
law may say, you just know that people 
out there are copying your program, 
and as a practical matter you will never 
find out and never be able to do any- 
thing about it. But why spoil the fun? 
Let's not dwell on the negative side of 
copyright protection. For now, tape a 
copy of your copyrighted program to 
the wall, beside your copyright certifi- 
cate if you have one, and enjoy the 
special feeling of accomplishment for 
having created something that didn't 
exist before. 

(Questions about this article may be 
addressed to Professor Samuels at New 
York Law School, 57 Worth Street, 
New York, NY 10013. Although he is 
interested in discussing copyright mat- 
ters of general interest to computer 
programmers and users, he is not cur- 
rently engaged in the practice of law, 
and will not give specific legal advice. 
If you have a serious copyright prob- 
lem, you should consult an attorney 
who specializes in the field. /W\ 
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EDUCATION OVERVIEW 



Programming the LOGO Turtle; 
Studies in Learning Transfer 



By Michael Plog, Ph.D 
Rainbow Contributing Editor 



One concept of learning is 
"transfer" — skills we learn in 
one situation are carried over 
(transferred) into another situation. 
The most expansive interpretation of 
this concept is that some subjects actu- 
ally teach students to think better. In the 
past, subjects have been included in 
school curricula because they were 
assumed to help students learn the 
process of thinking or creativity. 
Courses were thought to help in all 
other subjects because they presented a 
logical method of thinking about ever- 
ything. Some of you may have taken 
Latin in school with this justification. 

Some teachers have claimed that 
learning to program a computer would 
change the way students learn every- 
thing else. One influential proponent of 
this position is Seymour Papert, devel- 
oper of the computer language LOGO. 
Using the LOGO language, children send 
commands to a "turtle," which then 
draws pictures on a computer screen. By 
learning to program the turtle, the 
argument went, children would learn 
also to think. 
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Papert developed LOGO during the 
1970s. During the 1980s, researchers 
tested whether or not children program- 
ming the computer actually did think 
any better (or differently) than children 
without that experience. The evidence is 
mixed. 

Roy Pea, Midian Kurland and other 
colleagues at Bank Street College of 
Education in New York City conducted 
experiments with elementary and se- 
condary school students to determine 
the effects of transfer of learning. They 
found no evidence that students learn 
much from programming that can 
transfer to non-electronic problems. 

The first experiment began by expos- 
ing 16 students in grades three through 
six to 30 hours of self-initiated work 
with LOGO. They then gave a task to 
these children and to members of a 
comparison group. The task was to 
design an efficient plan for completing 
six classroom cleanup activities. The 
assumption of the researchers was that 
drawing with the LOGO turtle requires 
the same sort of forethought and anal- 
ysis of a space as organizing housekeep- 
ing chores; however, the LOGO group 
planned no better than the comparison 
children. 

The teachers of the LOGO children, 
once they saw the results of the exper- 
iment, decided to include more struc- 
tured lessons and group discussions in 
the LOGO work the following year. A 
second study was conducted. This time. 



encouraging students to use what they 
learned from LOGO, the planning task 
was put on a microcomputer. Again, the 
LOGO children produced no better plans 
than those in the comparison group. In 
addition, they did not make better use 
of computer feedback, think longer as 
they planned, or revise more intelli- 
gently. 

The researchers conducted a third 
study. This study involved high school 
students with two years of program- 
ming experience and a comparison 
group of students without program- 
ming experience. The researchers were 
looking for improvements in several 
problem-solving skills. The computer 
science students performed better than 
the comparison group only on one test 
that tapped their programming work in 
an obvious way. Other tests came out 
with no difference. 

Pea, Kurland and their colleagues 
concluded that programming instruc- 
tion, as it is now conducted, will not 
improve general thinking skills of stu- 
dents. 

Other researchers have found a more 
positive connection between program- 
ming and thinking. Douglas Clements 
and Dominic Gullo of Kent State Uni- 
versity in Ohio conducted an experi- 
ment with first graders. The students 
worked in groups of two or three on 
LOGO programming tasks for 80 min- 
utes a week. The control group con- 
sisted of children who worked on com- 
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puters for reading and math lessons, but 
did not learn programming. After only 
12 weeks, differences were noted among 
the LOGO children and the control 
group. The children learning program- 
ming gave much better directions when 
told to describe the route from A to B 
on a simple street map. They also 
thought longer and made fewer errors 
on a picture-matching task; generated 
more original ideas on a test of creative 
thinking: and asked questions sooner 
when faced with inadequate directions. 
Apparently, programming experience 
seems to make a difference in this study. 



"Low road transfer 
demands little 
conscious thought." 



The Kent State study differed from 
the Bank Street studies in several ways. 
It is impossible to determine which of 
these differences account for the differ- 
ent results. The Kent State study had 
students working in groups of two or 
three with an adult tutor. The tutor 
encouraged them to think aloud about 
mistakes, tracing the source of errors. 
(What did you tell the turtle to do? 
What did it do? How can you change 
your program to get it to do what you 
want?) The students in the Kent State 
study were also younger. (A later study 
involving first and third grade students 
found that first graders learned more 
than older children.) The tasks per- 



formed by the students were different in 
the two studies; different skills were 
measured. 

The major difference seems to be 
involvement of adults. The Bank Street 
researchers found that the elementary 
students learned new ideas as solutions 
to very specific problems and rarely 
generalized to closely related program- 
ming problems. The high school stu- 
dents in the Bank Street study borrowed 
programming code from each other 
without really understanding it. The 
tutors in the Kent State study encour- 
aged a much broader sort of learning. 

Beyond the differences of the studies, 
the contradictory results may be re- 
solved by a consideration of the way 
people learn to transfer skills from one 
context to another. Psychologists des- 
cribe two different methods of knowl- 
edge transfer: the "high road" and the 
"low road." 

Low road transfer demands little 
conscious thought. Once we have 
learned to drive a car, we can drive a 
truck without too much problem. Once 
students can read a book, they can 
easily read words scrolling across a 
computer screen. Low road transfer 
occurs when a skill becomes automatic 
(after practice) and is then applied to a 
new, but similar situation. 

High road transfer involves a con- 
scious effort to apply past experience to 
a particular problem. The learner has to 
consciously abstract a principle learned 
in one context to a different situation. 
For example, in feudal Japan and 
China, military leaders used a board 
game called "Go" to improve perfor- 
mance in battle. Mao Tse-tung actually 
wrote a book about his conquest of 
China by comparing it to a Go game. 



Closer to home, executives apply prin- 
ciples from chess (control of the center 
of the board) to business strategies. 

This high road transfer requires an 
understanding of the principles in- 
volved before applying them to a new 
context. The effort has to be conscious, 
unlike the skill of riding a bicycle. 

Courses in programming typically 
involve little stress on principles of 
problem-solving. Most classes deal with 
fundamentals, leaving the students to 
learn more advanced programming 
skills on their own. As students work in 
computer classes, they are not expected 
to reflect on broader abstractions to 
other problem-solving situations. They 
are expected to write a program that 
will calculate interest payments, alpha- 
betize a list of names or draw a map. 

It seems we can safely disregard the 
low road transfer of skills when consid- 
ering things like problem-solving and 
learning. Might it be possible to design 
a computer class that intentionally tries 
to teach broad problem-solving skills? 
What materials would be used to en- 
courage students to learn principles of 
thinking that could be used for a high 
road transfer? What teaching style 
should be associated with such a class? 
I have no answers, but maybe you do. 
Are you involved with a class that you 
think has potential for high road 
transfer of learning? If you have such a 
class, please tell me about it. Maybe we 
can test your students to see if your 
approach indeed contributes to transfer 
of higher order thinking. 

Your thoughts, comments, ideas and 
suggestions are welcome. Write me at 
829 Evergreen, Chatham, IL 62629. 
Until later, keep thinking of the high 
road. ^\ 
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up any tlawed disk and prompts built in disk zap lor repair. Complete 
with lull tutorial on Coco's disk inpul ' output access operation. 
S19.95 (J24.95CDN.) Reviewed January 87 

Code Buster machine language disassembler 

Three terrific programs to explore machine language. Screen or printer 
accurate disassembly ot binary code. Simple prompted procedure 
with some Instruction lo dissect and understand your ROMs. Fully 
documented lor only $19.95 ($24.95 CDN.) 



April 1987 THE RAINBOW 87 



TURN OF THE SCREW 



Transistor Buffers for Stereo 
Amplification 



By Tony DiStefano 
Rainbow Contributing Editor 



Last time, I showed you how to 
wire digital-to-analog conver- 
ters. A D-to-A converter is a 
device that, when hooked up to a com- 
puter, converts (or changes) a digital 
value, or number into an analog vol- 
tage. In the case of the CoCo, the digital 
value is from to 255, represented as an 
eight-bit binary value. Remember bi- 
nary? Anyway, this eight-bit binary 
value is converted into a voltage. The 
voltage output is directly proportional 
to the input value. The lowest possible 
digital value (0) gives the lowest output 
voltage, volts. The highest digital 
value (255) gives the highest voltage. In 
this case it should be about 5 volts. 

This time, I'll show you how to hook 
up a couple of small amplifiers and get 
some sound out of them. If you recall, 
the outputs of the D-to-A converters are 
the sum of several resistors. This has an 
output of about to 5 volts. If you want 
to connect this output to an external 
amplifier, such as a stereo system, then 
you don't need an amplifier but just a 
buffer. The reason you don't need an 
amplifier is the output voltage is high 
enough to drive a stereo. In fact, it is a 
bit too high. The typical input voltage 
of a "line in" on a stereo is about 1 volt. 
It needs to be brought down a little. 
Figure 1 shows one transistor buffer. It 
is an emitter-follower. It has a lot of 
current gain but no voltage gain. This 
is what we need. R2 in the circuit is used 
to lower the voltage to a usable level for 
the stereo. VI in the circuit is used as 
a volume control. If you only build one 

Tony DiStefano is a well-known early 
specialist in computer hardware pro- 
jects. He lives in Laval Quest, Quebec. 

88 THE RAINBOW April 1987 



From 
D lo A 




h: 



5V 



T1 



C5 I" 

See -J 
lexl 



I 



| R2 

V1 





Parts List 


Part Number Description 


R1 


10K resistor, % watt 


R2 


47K resistor, 'A watt 


T1 


2N2222 transistor 


V1 


10K variable resistor 


J1 


RCA female connector 



J1 

— £D Oulpul 



Figure 1 



Part Number 


Description 


R3 


100 ohm resistor, V* watt 


R4 


10.K resistor, V4 watt 


C1 


.1 Uf Cap., 50 volts 


C2 


.1 Uf Cap., 50 volts 


C3 


4.7 Uf Cap., 10 volts 


C4 


470 Uf Cap., 35 volts 


C5 


See text 


11 


LM 386 audio amp 


V2 


10K varible resistor 


S1 


2 to 4 inch speaker 


J2 


4-pin connector 




©5V 



C3 




Figure 2 



D-to-A converter you only need one 
circuit. If you build two D-to-As then 
you need two circuits. But instead of 
using two volume controls and adjust- 
ing them separately, use a stereo volume 
control that has two potentiometers 
built into one. 

If your stereo is too far away or you 
don't have a stereo, then you may want 
to build a small amp to drive some 
speakers. Figure 2 shows a circuit that 
does just thai. Il is an amplifier module 
that has just a few milliwatts. In fact it 
has 325 milliwatts, just right for a small 
speaker. 

All of the parts are available at your 
local Radio Shack store. If you used the 
CRC Project board, then there should 
be enough room left on the board to 
mount all of the parts. If you want to 
use a socket for the IC, then use an 8- 
pin socket. There is no special care 
needed in the construction of the amp, 
except the usual care in dealing with 
parts that can be damaged by static 
electricity. The usual project tools will 
be necessary; things like a soldering 
iron, pliers, cutters and a drill to mount 
the variable resistor. Hook up the 
circuit as in the diagram. The capacitor 
C2 should be as close to the IC as 
possible; It's a power supply decoupling 
cap, so the closer the better. Jl is just 
a 4-pin connector so if you want to 
disconnect the speakers, you won't have 
to unsolder the thing every time. 

The way the outputs are connected 
now, the signal coming from the D-to- 
A is very square. That is to say, it is very 
fast to change from one analog state to 
another. This tends to make the music 
very rich in harmonics, sometimes to 
the point that it may sound like distor- 
tion. C5 in the circuit acts as a low pass 
filter by shorting out high frequencies to 
ground. If you like the rich sounds of 
harmonics, leave out C5. Otherwise a 
value from .1 uf to I uf will soften these 



harmonics. Try several values and use 
the one that you like best. 

Now for the hard part. I say hard 
because for a hardware buff like me, 
software is a pain. But, hardware with- 
out software is not much good, so I have 
to deal with it. I looked around to see 
what I had in terms of musical software. 
After running through my old RAIN- 
BOWS, I found that the machine lan- 
guage routines used to generate four 
voices did not have listings, but only 
pages and pages of DATA statements. 
This makes it hard to find the driver 
routines and change them. 

So I decided to give basic guidelines 
on how to modify them yourself. Inside 
the CoCo there is a built-in D-to-A 
converter. It is located at SFF20 or 
653 1 2 in decimal. The D-to-A converter 
you have just built is at$FF40 or 65344, 
and if you built two D-to-As, the second 
one is at SFF41 or 65345. The idea is 
to find the location in memory that 
matches the address SFF20 and change 
it to SFF40. One thing to remember is 
that the address SFF40 is divided into 
two bytes, since the CoCo can only 
work with eight bits of information. The 
first is $FF or 255 in decimal and the 
second is $20 or 32 in decimal. 1 wrote 
a short BASIC program to locate any 
presence of the address $FF20 and 
change it to SFF40. This is the program: 

10 FDR I = &H1500 TO 8.H7EFF 
20 I F PEEK ( I ) =255 AND PEEK 
(I+l)=32 THEN POKE I+1.S.H40 
30 NEXT I 

There are a few things to remember 
with this program. First, PCLEAR 1 
before typing it in. Then, load in your 
music driver and music and run the 
program. The memory area covered by 
this program starts just after the BASIC 
program and runs to the top of a 32K 
machine. This is only a guideline on 



how to find the memory locations; 
people with good machine language 
skills will be able to find it with no 
problems. 

After looking through my disks of 
software, I found that I had the pro- 
gram Musica2. I checked the machine 
language driver and found the point at 
which the program referenced address 
was SFF20. I changed it by typing this 
statement: 

POKE 8.H3F79 ,&H40 

That redirected the output to the 
external D-to-A I built. It was great. If 
you are using a multipack, you must do 
another poke to change the access of the 
slot that the controller is in, to the slot 
that the D-to-A is in. There is a simple 
way of doing that: 

POKE &HFF7F , ( (X-l) * 16) 
+(7-1) 

Where X is the slot number that the 
controller is in (a number from 1 to 4), 
and Y is the slot number that the D-to- 
A converter is in. 

To make sure that two D-to-A con- 
verters work, I built two of them. I took 
my machine language disassembler and 
looked at how the program worked. 
After a short time, I came up with a 
stereo version. These are the pokes I did 
to convert the Musical Play program to 
use my stereo D-to-A converter: 

POKE &H3FSF ,&HEG 

POKE &H3F73 ,&HEB 

POKE &H3F77 ,&HFD 

POKE S.H3F79 ,&H40 

SAVEM"riO2ST",&H3F00,S.H3FBF, 

&H3F00 

This will make the modifications 
necessary to run it on my D-to-As and 
save a copy of it to disk. /Rv 



Mowing up to a Turbo PC/XT cumpatiblo 
costs loss than you think. 

• 4.77/8 Max Turbo |soff#srecotrtolled| 
« 256K Memory (640K Expandable) . (•) 
» 360K DSDD Disk Drive. 
» 150W Power Supply 

• Real Tine Clock. 
with battery backed Time & Date. 

« Parallel Printer Port. 

• 1 Serial Port (2nd port optional), 

• Game Port . 

• XT Style Keyboard. 

» Mono Graphics Adapter. (»•) <c\ • 
» High Res. Monochrome Monitor. (»«) ^«, 

• MS-DOS 3.1 

• Full 6 Ho. Limited Warranty ^/j 
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ttoso System 
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(••ISubstit'ite Colour Graphics Adaptor S JQC 
and TTL Colour Monitor for S y %J 

300/1200 Baud Modem S112.00 

(«) 640K upgrade add S 45.00 Mouse (serial port) S 68.00 

2nd rioppy Disk Drue S 69.00 MS-DOS 3.2 w/ GW Basic add.S 65.00 

2nd Serial Port add S 22.00 20Mb Hard Disk w/Controler .3389.00 



NEW 

DEDD 5 1/4" Disks; $.48ea./$41. 00 box 100 
with sleeves h lables. 100% GUARANTEED . 

t.£E AD IN LAST ISSUE FOR FRINTER RIEBONS 

Calif, add 6.5% Tax. / C.O.D. ADD SI. 50 

Vcdce (313)904-1393 / Data (805)253-0221 

Canyon County Devices 

P. 0. Boh C 
Saugus, Ca. 91 350 

PRICES APPLY TO LMTED STATES ORDERS ONLY. 
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It All Adds Up 



By Bill Carrigan 



How many times has someone told you that your 
computer is no more than an oversized calculator? 
They are more or less right, but you and I both 
know that to use the Color Computer as a calculator is no 
easy task. There have been many times when I needed to 
use my calculator but couldn't find it and had to resort to 
the computer (it's always in the same place). But trying to 
perform any volume of calculations was clumsy at best. 

With thanks to Peter Kerckhod {Co Cocad October 1985) 
for the polling methods and Apple Macintosh (for the idea), 
I went about making my Color Computer work like a 
calculator. 

After typing in the program and running it, you are 
presented with a calculator on the screen. The right joystick 
controls an arrow cursor that can be moved over the key 
pad. To select a key, simply position the arrow over the key 
and press the firebutton. That's all there is to it. The rest 
should be pretty self-explanatory. If you can operate a 
calculator, you can use this program. 

Two keys not normally found on a calculator are the Q 
key, which quits the program, and the left arrow, which 
allows you to delete the last digit entered, rather than 
clearing and reentering the complete number. The program 
is easy to modify, so help yourself. I've left a function key 
empty to do with what you wish. 



Bill Carrigan lives in Baiavia, New York, and is a computer 
programmer. His firs I exposure to computers was a 16 K 

CDC 3100 which filled an entire room. He has been 
programming large IBM systems for 10 years and has more 
recently developed an interest in micros. 



537 - 92 








Lastly, the program uses the high speed poke (POKE 
65495,0) and then restores it at the end of the program. 
If your computer does not accept this poke then delete Line 
10, which sets the high speed, and Line 1740, which restores 
the computer to normal speed when you quit the program. 

I hope you have as much fun using the program as I did 
writing it. 

(Questions about this program may be directed to Mr. 
Carrigan at 202 South Swan, Baiavia, NY 14020, 716-343- 
7588. Please enclose an SASE for a reply when writ- 
ing.) □ 
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%fm... 


...191 


940 , 
1120 .. 


237 
..126 




290 ... 


....43 


1330 .. 


....90 




510 ... 


...112 


1510 .. 


....87 




730 ... 


....40 


END .. 


....67 



The listing: C0C0CRLC 

10 POKE 65495,0 

20 CLEAR 5000:CLS:GOTO200 

30 X=INT( (JOYSTK(0)+58) *1.31) : Y= 

(JOYSTK(l)+97) :P=ABS( (1 AND PEEK 

(&HFF00) )*3-3) 

40 RETURN 

50 GET(0,0)-(6,6) , CI , G: LINE (0 ,0) 

-(6,6) , PRESET, BF:DRAW"S4;BM3,3NF 

H2D2E2L":GET(0,0)-(6,6) ,C2,G:PUT 

(0 , ) - ( 6 , 6 ) , CI , PSET : RETURN 

60 GET(X-3,Y-3)-(X+3,Y+3) ,C1,G:P 

UT (X-3 , Y-3 ) - (X+3 , Y+3 ) , C2 , AND : RET 

URN 

70 IF (LXOX) OR (LYOY) THEN PU 

T (LX-3 , LY-3 ) - (LX+3 , LY+3 ) , CI , PSET 

:LX=X:LY=Y:GOSUB60: RETURN ELSE R 

ETURN 

80 PUT (LX-3, LY-3) -(LX+3, LY+3 ), CI 

, PSET: RETURN 

90 ' 

100 ' TEXT GENERATION 

110 ' 

120 IF ASC(E$)>62 THEN 130 ELSE 

ON ASC(E$)-31 GOTO 850,860,870,8 

80,890,900,910,920,9 30,940,950,9 

60 , 970 , 980 , 990 , 1000 , 1010 , 1020 , 10 

30 , 1040 , 1050 , 1060 , 1070 , 1080 , 1090 

,1100,1110,1120,1130,1140,1150 

130 ON ASC(E$)-62 GOTO 1160,1170 

,1180,1190,-1200,1210,1220,12 30,1 

240,1250,12 60,1270,12 80,1290,130 

0,1310,1320,13 30,13 40,13 50,13 60, 

1370, 1380 , 1390, 1400, 1410 , 1420 , 14 

30 

140 » 

150 ' DRAW CHARACTER STRING 

160 > 

170 FOR C=1T0 LEN(T$) :DRAW"S4;BM 

=TX; ,=TY;":E$=MID$(T$,C,1) : GOSUB 

120 :TX=TX+SP: NEXT C: RETURN 
180 ' START OF PROGRAM 
190 ' 

200 DIM FF$(5,4) ,C1(1) ,C2(1) ,L1( 
6) , MO (255) :D$="V31L100O3B":SC=4: 
LX=3 : LY=3 

210 PG=0:GOSUB1470:N=3:GOSUB50 
220 N=l:FOR Y=3T01 STEP -l:FOR X 
=1T03 : FF$ (X , Y) =RIGHT$ ( STR$ (N) , 1 ) 
:N=N+1:NEXT XrNEXT Y : FF$ (2 , 4) ="0 
":FF$(3,4)=". M 



2 30 SP=8 : TY=80 : LF=5 : B$=" " : A$=" " : 

SC=4 

240 ' 

2 50 ' CURSOR POLLING 

2 60 ' 

270 GOSUB30:GOSUB70:IF P<>3 THEN 

GOTO 270 
280 T$="Y" 

290 FOR 1=83 TO 150 STEP 19 : IF ( 
X>I AND X<I+8) THEN T$="N" 
300 NEXT 

310 IF T$="N" THEN 270 
320 FX=INT((X-71)/19)+1 
330 FOR 1=105 TO 165 STEP 19: IF 
(Y>I AND Y<I+8) THEN T$="N" 

3 40 NEXT 

350 IF T$="N M THEN 270 

360 FY=INT((Y-93)/19)+l 

370 RX=(72+(FX*19)-19) :SX=RX+11 

380 RY=(94+(FY*19)-19) :SY=RY+11 

390 GOSUB80:PUT(RX,RY)-(SX,SY) ,M 

0,NOT:PLAYD$:PUT(RX,RY) -(SX,SY) , 

MO,NOT:GOSUB60 

400 ON FY GOTO 410,420,430,440 

410 ON FX GOTO 4 60,460,460,580,5 

90 

4 20 ON FX GOTO 4 60,460,460,600,6 
10 

430 ON FX GOTO 460,460,460,550,1 
740 

440 ON FX GOTO 270,460,460,620,6 

30 

450 ' 

460 'ADD A NUMBER 

470 ■ 

480 IF NC>8 THEN 270 

490 IF (INSTR(A$,".") > 0) AND ( 

FX=3) AND (FY=4) THEN 270 

500 NC=NC+1:A$=A$+FF$(FX,FY) 

510 LINE(73, 63)-(159, 81) , PRESET, 

BF 

520 TX=155-(NC*8) : T$=A$ : GOSUB170 

530 GOTO 270 

540 ■ DELETE A NUMBER 

550 IF NC=0 THEN 270 

560 A$=LEFT$(A$,LEN(A$)-1) :NC=NC 

-1 

570 IF NO0 THEN 510 ELSE LINE (7 

3,63)-(159,81), PRESET , BF : GOT02 70 

580 F=1:GOTO670 

590 F=2:GOTO670 

600 F=3:GOTO670 

610 F=4:GOTO670 

620 F=5:GOTO670 

630 IF A$="" THEN B$="":LF=5 ELS 

E A$="":NC=0 

640 LINE(73, 63)-(159, 81) , PRESET, 

BF:IF B$<>"" THEN T$=B$ : TX=155- ( 
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LEN(B$) *8) :GOSUB170 


920 DRAW"S=SC;BRBU4D2": RETURN 


650 GOTO270 


9 30 DRAW"S=SC;BR2HU2E" .-RETURN 


660 ' 


940 DRAW"S=SC;BU2ED2FU2NR3U2":RE 


670 "PERFORM FUNCTIONS 


TURN 


680 ' 


950 DRAW"S=SC;E5BD5H5": RETURN 


690 IF A$="" THEN LF=F: GOTO270 


960 DRAW"S=SC;BU2R5L2U3D6":RETUR 


700 IF LF=5 THEN C$=A$ : GOTO720 


N 


710 ON LF GOSUB 780 , 790 , 800 , 810 


970 DRAW"S=SC;BRU2": RETURN 


720 B$=C$:A$="":NC=0 


980 DRAW" S=SC;BU2R5": RETURN 


730 LINE (73 ,63) -(159, 81) , PRESET, 


990 DRAW" S=SC;BRURD": RETURN 


BF 


1000 DRAW" S=SC;E5": RETURN 


74^ IF LEN(B$)<10 THEN TX=155-(L 


1010 DRAW"S=SC;BUU3ER2FD3GL2":RE 


EN(B$)*8) :GOTO 770 


TURN 


75^ IF VAL(B$)>999999999 THEN B$ 


1020 DRAW" S=SC ; R4 L2U5G2 ": RETURN 


=LEFT$(B$,6)+RIGHT$(B$,4) ELSE B 


1030 DRAW"S=SC;NR4U2R3EUHL3":RET 


$=LEFT$(B$,10) 


URN 


760 TX=155-80 


1040 DRAW"S=SC;BUFR2EUHLE2L4":RE 


770 T$=B$:GOSUB170:LF=F:GOTO270 


TURN 


780 C=VAL(A$)*VAL(B$) :C$=STR$(C) 


1050 DRAW" S=SC; BR3U5G3R4 ": RETURN 


: RETURN 


1060 DRAW"S=SC;BUFR2EUHL3U2R4":R 


79^ C$=STR$(VAL(B$)/VAL(A$) ) :RET 


ETURN 


URN 


1070 DRAW"S=SC;BE4HL2GD3FR2EUHL2 


800 C$=STR$(VAL(B$)+VAL(A$) ) :RET 


" : RETURN 


URN 


1080 DRAW"S=SC;BRUE3UL4D" : RETURN 


810 C$=STR$(VAL(B$)-VAL(A$) ) : RET 


1090 DRAW"S=SC;BRR2EUHEHL2GFNRGD 


URN 


" : RETURN 


820 ' 


1100 DRAW"S=SC;BUFR2EU3HL2GDFR2" 


830 'DRAW STRINGS FOR NUMERICS 


: RETURN 


AND ALPHABETICS 


1110 DRAW" S=SC;RULBU2RUL": RETURN 


840 ■ 


1120 DRAW"S=SC;BU4RDLBD2RD" :RETU 


850 DRAW"S=SC;BR4": RETURN 


RN 


8 60 DRAW" S=SC;RBU2U2LD2": RETURN 


1130 DRAW"S=SC;BU2NE2F2": RETURN 


8 70 DRAW"S=SC;BU2U2BR2D2": RETURN 


1140 DRAW"S=SC;BUR3BU2L3": RETURN 


880 DRAW"S=SC;BRU4BR2D4URL4RU2LR 


1150 DRAW" S=SC;E2H2": RETURN 


4": RETURN 


1160 DRAW"S=SC;BU3UR3D2LBDD":RET 


890 DRAW"S=SC;R3U2L3U2R3LD4":RET 


URN 


URN 


1170 DRAW"S=SC;NR3U3ER2BD2LDRU": 


900 DRAW"S=SC;E4BL3DBR3BD2D":RET 


RETURN 


URN 


1180 DRAW"S=SC;U3ERFDNL3D2":RETU 


9 10 DRAW" S=SC ; BR2NU4H2R3 " : RETURN 


RN 




8.00 U.S. 
shipping. 



or money 

residents 

les tax. 
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1190 DRAW"S=SC;U4R2FGNL2FGL2":RE 

TURN 

1200 DRAW"S=SC;BRREGLHU2ERF" :RET 

URN 

1210 DRAW"S=SC;U4R2FD2GL2":RETUR 

N 

1220 DRAW"S=SC;NR3U2NR2U2R3":RET 

URN 

1230 DRAW"S=SC;U2NR2U2R3":RETURN 

1240 DRAW"S=SC;BU4BR3L2GD2FREUL" 

: RETURN 

1250 DRAW"S=SC;U4D2R3U2D4" :RETUR 

N 

1260 DRAW"S=SC;R2LU4NLR" :RETURN 

1270 DRAW"S=SC;BUFREU3": RETURN 

1280 DRAW" S=SC;U2RNF2NE2LU2": RET 

URN 

1290 DRAW" S=SC;NR3U4": RETURN 

1300 DRAW" S=SC;U4FRED4": RETURN 

1310 DRAW"S=SC;U4F3DU4" -.RETURN 

1320 DRAW"S=SC;BUU2ERFD2GLH":RET 

URN 

1330 DRAW"S=SC;U4R2FGL2" rRETURN 

13 40 DRAW"S=SC;BUU2ERFD2GNUNRLH" 

: RETURN 

1350 DRAW"S=SC;U4R2FGL2RF2":RETU 

RN 

13 60 DRAW"S=SC;R2EHLHER2": RETURN 

1370 DRAW"S=SC;BU4R2LD4" rRETURN 

13 80 DRAW"S=SC;NU4R3U4": RETURN 

1390 DRAW"S=SC;BU4D3FREU3":RETUR 

N 

1400 DRAW" S=S C, • NU4 ERFU4 ": RETURN 

1410 DRAW"S=SC;UE2UDGHUDF2D":RET 

URN 

1420 DRAW"S=SC;BU4DFEUDGD2":RETU 

RN 

1430 DRAW"S=SC;NR2UE2UL2": RETURN 

1440 ' 

1450 ' CREATE SCREEN 



1460 ' 

1470 PMODE 4,1: SCREEN 1,1:COLOR0 

, 1 : PCLS 

1480 LINE(65,50)-(168,170) ,PSET, 

B 

1490 LINE(64,49)-(169,171) ,PSET, 

B 

1500 LINE(70,60)-(162,84) ,PSET,B 

F 

1510 LINE(73, 63)-(159, 81) , PRESET 

,BF 

1520 FOR X=73 TO 150 STEP 19 

1530 FOR Y=95 TO 155 STEP 19 

1540 LINE(X,Y)-(X+13,Y+13) ,PSET, 

BF 

1550 COLOR 1,0 

1560 LINE(X-2,Y-2)-(X+ll,Y+ll) ,P 

SET,BF 

1570 COLOR 0,1 

1580 LINE(X-2,Y-2)-(X+ll,Y+ll) ,P 

SET,B 

1590 NEXT Y 

1600 NEXT X 

1610 A=1:X=75:SC=4:SP=19 

1620 Tl$(l)="789*/" 

1630 Tl$(2)="456+-" 

1640 T1$(3)="123)Q" 

1650 Tl$(4)=" 0.=C" 

1660 FOR TY=102 TO 161 STEP 19 

1670 T$=T1$(A) :TX=X:GOSUB170 

1680 A=A+1 

1690 NEXT TY 

1700 TX=44 : TY=22 : SC=8 : SP=10 :T$=" 

COCO CALCULATOR" :GOSUB170 

1710 TX=40 : TY=42 : SC=8 : SP=10 : T$=" 

BY BILL CARRIGAN" :GOSUB170 

1720 RETURN 

1730 ■ 

1740 POKE 65494,0 

1750 END ^ 
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DELPHI BUREAU 



Checking Into Conference 



By Cray Augsburg 
Rainbow Technical Editor 



Welcome to Delphi Bureau! 
Those of you who have been 
with us over the past year or 
so have certainly seen some changes in 
the CoCo S1G. We started with very few 
members, but slowly have gained 
strength and now, are one of the busiest 
SIGs on Delphi. While the SIG staff is 
necessary for such success, the most 
important ingredient to our success has 
been you, the SIG member. Your sup- 
port and suggestions have made the 
CoCo SIG what it is: an excellent place 
to meet other computer users interested 
in the CoCo. Imagine, "talking" online 
with people from across the United 
States. Getting immediate help from the 
CoCo gurus. We have received several 
requests from the SIG membership for 
coverage of the SIG Conference on 
these pages. So, this month, Delphi 
Bureau will be devoted to Conference 
commands. 

Before I get started, however, I would 
like to say that all the requests have 
brought out a very important point. The 
CoCo SIG membership is steadily in- 
creasing. Because of this, we have new 
members each and every day. These 
people need our help in learning the 
ropes. Let us be patient and polite as we 
guide new members so that they, too, 
may enjoy the benefits to be found from 
our SIG. 

The CoCo SIG Conference area is a 
special area on Delphi which is designed 
so that you can directly interact with 
other users just as you might talk over 
a telephone. The main differences are 
that you can "talk" with more people at 

Cray Augsburg is rainbow's technical 
editor and has an associate 's degree in 
electrical engineering. He and his wife, 
Ruth Ann, have two children and live 
in Louisville, Ky. His username on 
Delphi is RAINBOWMAG. 
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the same time, and that you must type 
instead of vocalize. Conference is just 
one of many important and beneficial 
ways to utilize Delphi for the exchange 
of information. If you need help from 
a specific user, you can arrange with 
him via Delphi Mail for a specific time 
to be online. Then you can page each 
other into a Conference. This can be 
one-on-one or an open meeting between 
several users. Some of you may recall 
the excellent open conference we held 
the night of July 30, 1 986, the same day 
the Color Computer 3 was announced. 
Over 30 people attended the online 
conference and were able to hear first- 
hand about the new machine. Yet, 
Conference can be used even if you just 
want to say "hello." 



To get to the CoCo SIG Conference 
area, just enter CO at the CoCo SIG 
prompt. If you are at prompt level three, 
you will be greeted with the Conference 
menu. Items from this menu are: 

WHO — This command lists all users 
online in the CoCo SIG and places 
parentheses around the names of those 
users in the Conference area. It also lists 
the names of the Conference groups 
already created. 

JOIN — Allows you to join a group. 
Just enter JOIN group name. If the 
group exists and is not a private group, 
you will immediately become a member 
of the group. If it doesn't exist, Delphi 
will create it and you will become the 
group leader. 

PAGE — As its name implies, this 



DATABASE REPORT 



Our new OS-9 Online Special Interest 
Group is off to a solid start. We are 
approaching our first thousand messages 
in the forum as I write this and, over the 
last month, the OS-9 Online database has 
grown significantly. We have now offi- 
cially closed down the OS-9 topic area on 
the CoCo SIG and are referring all OS- 
9 uploads and many OS-9 forum mes- 
sages to OS-9 Online. 

Disk Extended Color BASIC users who 
have Color Computer 3s, Multi-Paks, 
and RS-232 packs may be interested in 
checking out our Data Communications 
section of the CoCo SIG, where Rick 
Adams (RICKADAMS) has just uploaded 
Rickyterm, a "low voltage guiltware 
terminal emulator." Rickyterm supports 
40-and 80-column display, as well as 
Xmodem file transfer, and offers some 
unique handling of strings that allows 
you to have instant single-key access to 
any string typed in or received on your 
terminal. This feature can be used to 
produce interesting effects in conference. 



permits auto-dialing, and facilitates a 
number of other applications. 

New in the OS-9 Online Database 

In the OS-9 Online SIG's general topic 
area. Rick Adams has sent us a text file 
describing graphics commands for Level 
II BASIC. Kevin Darling (KDARLING) has 
sent us a description of OS-9 Level II 
window codes and also a file that tells 
folks how to extract the Level II kernel 
from the just-released game Rogue. (This 
is for folks who wanted advance access 
to OS-9 Level II.) Jay Truesdale (JAY- 
TRUESDALE) has sent us a fascinating 
announcement from Atari about two 
interesting new products. 

In the Applications section of OS-9 
Online, Bill Brady (wbrady) has sent us 
a BAS1C09 program to calculate sunrise 
and sunset times, a driver for the Radio 
Shack CGP-H5 graph plotter, and a 
simple database program. In the Utilities 
section, Peter E. Durham (PEDX1NG) has 
sent us a program for modifying various 



option allows you to page another user 
to the Conference area. 

NAME — This option allows you to 
change your name while in Conference. 
It doesn't change your username, but 
changes the way other users see your 
name. Most people choose to change to 
their first names. Others have special 
online nicknames they favor. 

EXIT — As with all areas of Delphi, 
you can leave the Conference area by 
entering EXIT or pressing CONTROL-Z. 

This is the basic Conference menu. It 
is available immediately upon entering 
the Conference area. Once you have 
joined a group, however, a more pow- 
erful set of commands and options 
becomes available to you. Some special 
commands, which will be covered in a 
future issue, are only available to the 
group leader. As stated above, the 
group leader is the person who created 
the group in the first place. If that 
person should leave the group for any 
length of time, he will lose his group 
leader status, and the second person 
who originally entered the group will 
take over. Following is a list of the 
immediate commands available while in 
a conference group. To see the list 
online, just enter 'HELP. Notice that all 
commands must be prefaced with a 
slash (/). If they are not, the Conference 
software will just send them to all other 
members of the group, thinking it is 
text. 

'ANSWER — Issue this command 



when you want to accept a page from 
someone in another group. 

--BUSY — Use this command to disable 
/SENDs from users outside your confer- 
ence group. You can "ungag" yourself 
by typing /N0BU5Y. 

/BYE — This command causes a 
complete logoff from Delphi. 

/CANCEL — This command cancels 
all pages you have issued that are still 
pending or unanswered. 

/EXIT — Use this or CONTROL-Z to 
exit the group and return to the Con- 
ference menu. 

/GNAME name — This command al- 
lows any member of the conference 
group to change the name of the group. 

/HELP — Causes this list, without 
definitions, to be displayed to your 
screen. 

/ JOIN groupname — This command 
allows you to become a member of a 
different group, thereby leaving the one 
you are presently in. You can also use 
/JOIN groupnumber. 

/MAIL — By issuing this command, 
you temporarily leave Conference and 
enter your Mail area. However, anyone 
who joins your group will think you are 
still there. They will see your name as 
being a group member. Because of this, 
it might be wise to use /NAME to change 
your name to something like IN MAIL or 
BE RIGHT BACK. 

/NAME nickname — Allows you to 
change your visible name from your 
username to a nickname. The change is 



not permanent and will not remain in 
effect after you leave the Conference 
area. Similarly, anyone not in the 
Conference area will see your normal 
username if they do a WHO. 

/PACE username — You can page any 
other user in the CoCo SIG to your 
Conference group by issuing this com- 
mand with their username. The only 
exception is that they won't receive the 
page if they are presently gagged, or 
busy. Rather, you will get a message 
telling you they are not available. 

/REJECT — Allows you to reject a 
/PAGE from another user. If you send 
this command, the other user will re- 
ceive a message telling him you do not 
want to talk with him. 

/REPEAT — Causes all text you send 
to other group members to be repeated 
back to your terminal as you sent it. You 
can turn this off by typing /NOREPEAT. 

/RNAME nickname — If you want to 
know which nickname corresponds to 
which username, issue this command 
followed by the nickname in question. 

/SEND name-list message — This 
command allows you to send a semi- 
private message to those usernames 
listed in the name list. These usernames 
must be separated by commas if you use 
more than one. A message sent this way 
will be seen only by those people listed 
in name-list. It will not be seen by any 
other members of the Conference 
group. This is a great way to "talk 
behind someone's back," but be careful. 



keyboard server defaults for Level I, 
Version I and Version 2. Roger Smith 
(smudger) has provided UNLOAD . 09, a 
procedure to unlink modules until they 
disappear from memory. 

In the Device Driver topic area, Toni 
Ryan (TNTRHOIMN) has provided source 
code for a disk driver, allowing you to 
change stepping rates and number of 
heads and tracks. Michael Dziedzic 
(MJD) has uploaded various 80-column 
screen drivers for OS-9 Level I, including 
a particularly sharp 25-line driver. Vin- 
cent Figundio (vinfig) has sent us a 
RAM disk driver for OS-9 Level I on the 
CoCo 3. 

In the Telecommunications area, Bill 
Brady has been quite busy, uploading 
five new groups that comprise his BigT 
telecommunications package. These 
include BIGT, an Xmodem terminal 
program that allows auto-logs and baud 
rate changes, SIO and SI02.ASM 
(source code for ACIA pack drivers for 
BIGT for Level I and Level II OS-9), 
NUHOST (source code for his auto-log 
files), and NUHOST . I (object modules to 
create the auto-log files for BIGT). 



Lastly, in the Patches topic area, our 
own Don Hutchison (DONHUTCHISON) 
has given us Fast Boot, a utility that 
allows you to patch the boot file for OS- 
9 Level I, Version 2, to allow faster 
booting by utilizing 6-ms step rates 
during the boot process. 

New in the CoCo SIG Database 

In the General topic area, Mike 
Fischer (MIKE88) uploaded a discussion 
from a local BBS about the CoCo 3 
versus the IBM PC (with a few misunder- 
standings about the significance of clock 
speeds). 

In the Data Communications section, 
in addition to Rick Adams' debut of 
Ricky term, we also have received a dialer 
program for MikeyTerm, from Ron 
Bihler (raab) and several Ham radio 
programs (including an RTTY program) 
from Rainbow's Dan Downard (DAN- 
downard). Of course, readers should 
note that, as of last month, we have 
online the latest revision of MikeyTerm 
(Version 4.3) by Mike Ward (MIKEWARD) 
that supports the CoCo 3 in 80-column 
mode. Mike Ward, a SysOp on Compu- 



Serve, visits Delphi's CoCo SIG almost 
daily and is available to answer questions 
about MikeyTerm. 

Our Graphics database has been burst- 
ing with new files. Jim Stewart (WHEEL- 
JIMMER) has sent us a stunning CoCo 3 
picture of a Unicorn (which he noted was 
drawn entirely using mouth control due 
to his disablity). Emery Mandei (EMAN- 
DEL) has sent us a Pink Floyd logo and 
a peace symbol for the CoCo 3. Mike 
Fischer has sent a revised driver for his 
bouncing ball demo program, now allow- 
ing for a rainbow-colored ball. John 
Snyder (MYTHRANDIR) has provided an 
updated and improved version of his 
Hcapy utility for converting graphics 
screens. Pat Leathrum (LEATHRUMRA) 
has given us a picture of the Eagle Lunar 
Lander. Richard Trasborg (TRAS) has 
sent a number of images of women. 

I uploaded some alternate software 
fonts for the CoCo 3 under the HPRINT 
command, including a 1 28-character set 
that provides for letters in the same fonts 
used by the IBM PC color graphics 
adapter. Raymond Lueders (MOON- 
SHINE) has also given us some female 
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If you forget the slash, or if it isn't the 
first character on a new line, all group 
members will see the message. 

/SQUELCH name - - This command 
allows you to "block out" another user. 
Anything he sends you with 'SEND or 
anything he says in Conference will not 
be sent to your terminal. To be polite, 
only use this if someone is really bug- 
ging you. It might be more polite to 
simply leave the group. 

'TALK groupnumber — This com- 
mand allows you to temporarily talk to 
another conference group without leav- 
ing the group you are presently in. You 
may use this any number of times to 
become a semimember of any number 
of groups. You will be "listening" to any 
groups you pick, but you must use 
'TALK groupnumber to talk back. You 
can only talk to one group at any one 
lime. You can leave a group that you 
joined with ''TALK by using CONTROL- 
Z, /EXIT or /JOIN. You must use the 
group number for this command. As an 
example, if you want to listen and talk 
with group number 3 without leaving 
your present group, just type /TALK 3 
and press ENTER. 

/TIME — When you issue this com- 
mand, you will see what time of day it 
is (handy for long conferences), as well 
as how long you have been logged onto 
Delphi. 

/WHO — This command shows who is 
in Conference and in which groups. 
Each group listing has a unique group 
number. Use this number for /TALK. 



You will also see the usernames of all 
people currently in the CoCo SIG. 

/WHO IS username — This allows you 
to get the Delphi user profile for the 
indicated username. This assumes the 
user has entered a profile at the People 
on Delphi option of the main Delphi 
menu. 

More information can be found for 
these and other commands by typing 
/HELP -'subject while in Conference 
where subject is the command you want 
more information about. 

User Profiles Needed 

It has been pointed out that many 
users, especially newcomers to the SIG, 
have not yet posted their personal 
profiles. It is important that other 
members be able to find out a little 
information about you. It is especially 
useful to have this information when 
talking in Conference with other users. 
It lets you get a little background 
information on the people with whom 
you are communicating. All that is 
necessary is that you answer a few 
simple questions about yourself. First, 
at the CoCo SIG prompt, enter MEMBER 
to get to the membership directory. 
Then type I -AM and answer the 
prompts. Now, this profile is not the one 
used when someone types /WHOIS in 
Conference. You need to go to the Main 
Delphi menu and enter PEOPLE. Then, 
again, type I -AM and answer the 
prompts. These simple procedures take 



no more than a few minutes and will 
enhance the friendly atmosphere on the 
SIG. While you are in these member 
directories giving your user profile, you 
might also enter WHOIS MARTYBOODMAN. 
I think you will find out quite a bit 
about this knowledgeable CoCo per- 
sonality. 

Are you one of the many who would 
like a "cleaner" way to hang up on 
Telenet? Well, in addition to simply 
typing HANG at the Telenet @ prompt 
after you log off Delphi, you can con- 
figure your pad setup to automatically 
hang up on Telenet when you log off 
Delphi. At the SIG > prompt, simply 
type: 

/PADSETUP : , 32 : 1 ENTER 

/SAVE ENTER 

Having done that, the new pad setup for 
you will be saved as the default and 
from then on, until you change it, you 
will get an automatic hangup on Tele- 
net. There is no similar setup to cover 
Tymnet, as far as we know. If you want 
to "undo" the pad setup, use: 



/N0PAD5ETUP 
/SAVE 



ENTER 
ENTER 



Note: Do not play with these commands 
if you are direct-dialed (not using 
Telenet or Tymnet.) 

Hope this is helpful to you. □ 



images, and some cartoons as well. Bob 
Wharton (BOBWHARTON) uploaded sev- 
eral nice CoCo 3 pictures (including 
Opus of Deathtongue and a set of NCAA 
college logos), and James Kenney (KEN- 
ney) sent us his HDISPLAV utility. 

Bob Montowski (graphicspub) sent 
us a utility for viewing 16-level DS-69 
pictures on a CoCo 3. 1 should note that 
Microworks, the maker of the DS-69, has 
just released a B version of this unit that 
works on the CoCo 3 and, in the official 
driver software, supports display of 16 
gray-level pictures on the CoCo 3. Loren 
Howell (xenos) has sent us his BASIC 
drawing program, Hdoodle, for the 
CoCo 3. In the Music topic area Jona- 
than Griffin (JAG) has sent us his Sleigh 
Ride composition. 

In the Games database, David Ferreira 
(SKEEVE) has provided a Star Trek game 
for the CoCo 3. Jim Thompson (blud- 
geon) has sent two new games, including 
a Game of Life program. Ed Niklas 
(RAINMAKER) has sent us an Adventure 
game, and Martyn Phillips (NORABDER) 
has uploaded Starlanes. Steve Macri 



(dracman) has sent us a Chawks foot- 
ball game for the CoCo 3, and our own 
Cray Augsburg and Don Hutchison have 
sent us a number of new games, including 
the Realm of Nauga and a Motorcycle 
Jump game. 

In the Hardware Hacking section, I 
have uploaded instructions on how to 
hook a CoCo 3 RGB port to a Sony XBR 
or Profeel-type monitor. Dennis Skala 
(DENNYSKALA) has sent information on 
modifying a PBJ CC bus for the CoCo 
3. 

In the Utilites and Applications sec- 
lion. Art Flexser (artflexser) has 
provided a program to allow viewing of 
all possible foreground, background, and 
border color sets on an 80- or 40-column 
text screen. This utility is part of Art's 
newly released ADOS3 package of DOS 
enhancements for CoCo 3 systems. 
Roger Hallman (rogf.rh) sent a Ram 
disk for the CoCo 3. Roger Krupski 
(Hardwarehack) has sent a 512K me- 
mory tester, also for the CoCo 3. Ken 
Schunk (kenschunk) sent what I under- 
stand is a definitive patch for CoCo Max 



software to allow it to run on a CoCo 3 
(but only using old PAL chips or a Y 
cable). Don Hutchison has sent us a 35- 
to 40-track patch program, a disk editor, 
and a disk aid utility. Leonard Litberg 
(radical) has sent us a CoCo 3 screen 
utility. Derrick Kardos (DTG) has sent us 
a public domain word processor. Dave 
MacLeod (SCORPION2) has sent us Bac- 
par Version 2.0. 

In the Source Code for 6809 section. 
Don Hutchison has sent us an RS-232 bit 
banger 5END routine. Alan DeKok 
(alandekok) has sent NEWATTR . ASM, a 
Utility for manipulating CoCo 3 text 
attributes. Jim Thompson has sent us the 
source code for his Onedee game and for 
a Game of Life. In the CoCo 3 News and 
Information area. Art Flexser has sent us 
a file about the "reset bug" in the CoCo 
3, Alan Dekok has sent us a program to 
extract the control-alt-reset picture 
of the three Microware Mugs, and Ri- 
chard Trasborg and Jim Shoop (BAZAR) 
have sent us various sorts of patches for 

CoCo Max. 

— Marty Goodman 

Rainbow's Delphi Database Manager 
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GAME 




Hippity Hoppity Down the 
Bunny Trail! 




Children in our school enjoy coming to computer lab 
each week. However, holidays are especially awaited 
by the children. For this reason, my husband and I 
wrote Easter Patterns. Not only is the game enjoyable but 
it is educational as well. 

Easter Patterns includes the Easter bunny, Easter eggs 
and Easter music. The children are drilled in selecting 
patterns. Several eggs are displayed and the child must 
decipher the pattern and chose which egg is next. Each time 
the correct egg is chosen, the bunny hops across the screen 
and places an egg in the basket. If the wrong egg is chosen 
for the pattern, the child is asked to try again. When the 
child answers correctly three consecutive times, the 
difficulty of the pattern increases. If he cannot answer 
correctly more often than incorrectly, the program auto- 
matically defaults to the easier level. With 10 correct 
answers, the bunny completely fills the basket and hops 
away, basket and all, to the tune of "Here Comes Peter 
Cottontail." 

Easter Patterns provides the child with an interesting 
problem and quick rewards. 

(Questions about this program may be directed to the 
Petits at 135 Davis Drive, Luling, LA 70070. Please enclose 
an SASEfor a reply.) □ 

Laura Petit holds a master's degree in curriculum and 
instruction, and is the computer coordinator at Our Lady 
of Prompt Succor School in Westwego, Louisiana. Chris 
is a self-taught computer programmer. Together, they enjoy 
writing programs for the school's computer lab. 
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Coming soon also by Dale Puckett and Peter Dibble: 
A complete Rainbow guide to using OS-9 Level II on the Color Computer 3. 



□ Please send me The Complete 
Rainbow Guide To OS-9 for $19.95. ' 



Name _ 
Address 
City 



□ Please send me The Rainbow Guide 
To OS-9 Disk (a package of two 
disks) for $31.* Does not include 
book. 
Signature 




D My check in the amount of is enclosed. 

D VISA D MasterCard □ American Express |Ji 
Account Number 



State 



ZIP_ 



_Card Expiration Date 



Mail to: The Complete Rainbow Guide to OS-9, The Falsoft Building, P.O. Box 385, Prospect, KY 40059 

To order by phone {credit card orders only) call 800-847-0309, 8 a.m. to 5 p.m. EST. 
For other inquiries call 502-228-4492. 

'Add $1.50 per book shipping and handling in U.S. Outside U.S. add $4 per book. Allow 6-8 weeks for delivery. KY residents 
add 5% sales tax. In order to hold down costs, we do not bill. ALL ORDERS IN U.S. FUNDS. 

OS-9 is a trademark of Microware Systems Corporation. 
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The listing: EASTER 

1 DIM A$(28) ,N$(10),C(7) ,E0(16) , 
El (16) ,E2(16) ,E3 (16) ,E4(16) ,E5(1 
6) ,E6(16) ,E7(16) ,R1(40) ,R0(35) ,E 
X(ll) ,EY(11) ,00(11) 

2 RESTORE: FOR 1=0 TO 28: READ A$ ( 
I): NEXT: FOR 1=1 TO 9: READ N$(I): 
NEXT 

3 PMODE3,1:PCLS:SCREEN1,0 

4 COLOR4: CIRCLE (56, 129) ,40, ,1.2: 
CIRCLE (56, 129) ,2, , . 9 : CIRCLE ( 56 , 1 
45) 20 .30 .5 

5 LINE(72,123)-(112,105) ,PSET:LI 
NE ( 72 , 12 9 ) - ( 112 , 12 9 ) , PSET : LINE ( 7 
2,135)-(112,153) ,PSET 

6 LINE (40, 123 )-(0, 105 ), PSET: LINE 
( 40 , 12 9 ) - (0 , 12 9 ) , PSET : LINE (40,13 
5)-(0,153) ,PSET 

7 CIRCLE(30,54) ,20, ,2, .25, .20:01 
ROLE (78, 54) ,20, ,2, .35, .23 

8 PAINT(34,90) , 2 , 4 : PAINT (79 , 89) , 
2, 4: PAINT (56, 90) ,2,4 

9 CIRCLE (40, 111) ,4,3, .9:CIRCLE(7 
2, 111), 4, 3, .9 

10 'write title screen 

11 A$="EASTER M : DRAWBM120 , 70C4S1 
2":GOSUB20 

12 A $=" PATTERNS" : DRAWBM93 , 103" : 
GOSUB20 

13 A$="BY" : DRAWBM170 , 140S8C3" : G 
OSUB20 

14 A$="CHRIS AND":DRAW"BM12 5,160 
":GOSUB20 

15 A$="LAURA PETIT" :DRAW"BM110,1 
80":GOSUB20 

16 'music — thanks paula & james 

17 PLAY"L4T303EGP64GAECP64L2CL4A 

P6404CP64CD03AL8FP64L2FL16GP16GP 

16L4GP3 2L16GP16GP16L4GP3 2BAFAL2G 
ii 

18 FORDE=1TO400:NEXTDE:GOTO112 

19 ' subroutine to write to scr 

20 L=LEN(A$) :FOR 11=1 TO L:C=ASC 
(MID$(A$,I1,1) )-65:IF C=-33 THEN 

DRAW "BR5": NEXT II ELSE IF C<0 T 
HEN C=C+47 

21 IF C=45 THEN 0=26 

22 DRAW A$(C) :NEXTI1: RETURN 



23 PCLS:NR=0 

24 FOR 1=0 TO 7:READ EX(I),EY(I) 
,C(I) 

25 'draw eggs 

26 CIRCLE(EX(I) ,EY(I) ) ,13,0(1) , . 
9, .25, .75: CIRCLE (EX (I) ,EY(I) ) ,20 
,C(I) , .5, .75, .25 

27 NEXT I 

28 PAINT(20,20) ,0(0) ,C(0) 

29 PAINT(80,25) ,0(1) ,C(1) : COLOR 
C(1)-1:DRAW"BM80,25;S4;BU4L8R2 4B 
D4R2L27BD4R25" 

30 PAINT (144, 25) ,C(2) ,0(2) : COLOR 
C(2)-1:DRAW"BM144,25;NL12NR16U5 

NU4NL9NR12D10ND4NL9NR12BR6D4U16B 
L12D16" 

31 POKE 178, 104: PAINT (200, 25) , ,C 
(3) 

32 COLOR 0(4) : PAINT (25 , 60) , ,C(4) 
: COLOR C(4)-l:DRAW"BM2 5,60;NE8NF 
8NG7NH7NL12NR11" 

33 POKE 178,225:PAINT(85,60) , ,C( 
5) 

34 POKE 178,250:PAINT(145,60) , ,C 
(6) 

35 POKE 178, 13. -PAINT (200, 60) , ,C( 
7) 

36 'store the eggs in arrays 

37 'each egg array 32x19 

38 GET (8,15)-(40,34) ,E0,G 

39 GET (68,15)-(100,34) ,E1,G 

40 GET (128,15)-(160,34) ,E2,G 

41 GET (188,15)-(220,34) ,E3,G 

42 GET (8,50)-(40,69) ,E4,G 

43 GET (68,50)-(100,69) ,E5,G 

44 GET (128,50)-(160,69) ,E6,G 

45 GET (188,50)-(220,69) ,E7,G 

46 'draw rabbits on screen 

47 POLS : DRAWBM160 , 180 ;C2L4E3R3U 
1H3L7H2U2E2R2E1R2H10E3F12U10E3F3 
D10R2U1R2U1R12F2R1F2R1F2D1G6L6F4 
L14E3M162,180" 

48 PAINT (160, 168) , 2 , 2 : PSET (154 , 1 
68,3) :PSET(154,167,3) :PSET(149,1 
69,3) 

49 'store rabbit in array Rl 

50 GET (145,153)-(199,180) ,R1,G 

51 POLS : DRAWBM194 , 180 ;C2G2L2H2E 
3U3E1U1E1U2G1L1U1H1U1E4H2L1H2U2E 
2R1E2R3F2R2F2D2G3F4D2G2F2D4F2D2G 
2L2H4G2" 

52 DRAWBM192 , 153 ;C2H2U2H2U2H3G2 
D2F2D2F4;BM196,153;E2U2E2U2E3F2D 
4G2D3G2D2" 

53 PAINT (200, 150) ,2, 2: PAINT (187, 
149) ,2, 2: PAINT (194, 158) , 2 , 2 : PSET 
(193,158,4) :PSET(198, 158,4) :PSET 
(196,160,3) 
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54 GET(180,140)-(211,183) ,R0,G 

55 FOR 1=0 TO 11: READ EX(I),EY(I 
) ,CC(I) : CIRCLE (EX (I) +210, EY (I) ) , 
5,CC(I) : PAINT (EX (I) +21)3, EY (I) ) ,C 
C(I) ,CC(I) :NEXT 

56 'draw basket 

57 DRAWBM26 , 182 ;C4L18M3 , 163R30M 
2 6, 182": CIRCLE (16 ,162) ,18,4,1.3, 
.5, .99 

58 A$="EASTER PATTERNS" : DRAW" BM1 
5,20; C3 ; S8 " : GOSUB20 

59 A$="WHICH COMES NEXT?" : DRAW" B 
M0,90C4":GOSUB20 

60 GOTO 116 

61 'put eggs on screen 

62 X=X+40:ON E GOTO 63,64,65,66, 
67,68,69,70 

63 PUT(X,Y)-(X+32,Y+19) ,E0,PSET: 
RETURN 

64 PUT(X,Y)-(X+32,Y+19) ,E1,PSET: 
RETURN 

65 PUT(X,Y)-(X+32,Y+19) ,E2,PSET: 
RETURN 

66 PUT(X,Y)-(X+32,Y+19) ,E3,PSET: 
RETURN 

67 PUT(X,Y)-(X+32,Y+19) ,E4,PSET: 
RETURN 

68 PUT(X,Y)-(X+32,Y+19) ,E5,PSET: 
RETURN 

69 PUT(X,Y)-(X+32,Y+19) ,E6,PSET: 
RETURN 

70 PUT(X,Y)-(X+32,Y+19) ,E7,PSET: 
RETURN 

71 'egg pattern chosen here 

El holds the correct answer 
7 2 SCREEN1,0:LL=0:Y=40:X=-40:C=R 
ND(5):ON C GOTO 73,74,75,76,77 

73 E=RND(6)+l:GOSUB62:GOSUB62:E= 
E+l : GOSUB62 : E=E-1 : GOSUB62 : E1=E : G 
0T085 

74 E=RND(6)+l:GOSUB62:E=E+l:GOSU 
B62 : GOSUB62 : E=E-1 : GOSUB62 : E1=E+1 
:G0T085 

75 E=RND(6)+l:GOSUB62:E=E+l:GOSU 
B62 : E=E-1 : GOSUB62 : E=E+1 : GOSUB62 : 
El=E-l:GOT085 

76 E=RND(4)+2:GOSUB62:E=E+l:GOSU 
B62 : E=E+1 : GOSUB62 : E=E-2 : GOSUB62 : 
El=E+l:GOT085 

77 E=RND(8) : GOSUB62 : GOSUB62 : GOSU 
B62 : GOSUB62 : E1=E : GOT085 

7 8 LL=1:X=-40:C=RND(6) :ON C GOTO 
79,80,81,82,83,84 

79 E=RND(5) :GOSUB62 :E=E+l:GOSUB6 
2 : E=E+1 : GOSUB62 : E=E+1 : GOSUB62 : E= 
E-3 : GOSUB62 : E1=E+1 : GOT085 

80 E=RND(6) :GOSUB62:E=E+l:GOSUB6 
2 : E=E+1 : GOSUB6 2 : GOSUB6 2 : E=E- 1 : GO 



SUB62 : E1=E-1 : GOT085 

81 E=RND(6) :GOSUB62:GOSUB62:E=E+ 
1 : GOSUB62 : GOSUB62 : E=E+1 : GOSUB62 : 
El=E:GOT08 5 

82 E=RND(6) : GOSUB62 : E=E+1 : GOSUB6 
2 : GOSUB62 : E=E+1 : GOSUB62 : E=E-2 : GO 
SUB62 : E1=E+1 : GOT085 

83 E=RND ( 7 ) : GOSUB62 : E=E+1 : GOSUB6 
2 : GOSUB62 : GOSUB62 : E=E-1 : GOSUB62 : 
El=E+l:GOT085 

84 E=RND(7) : GOSUB62 : GOSUB62 : E=E+ 
1 : GOSUB62 : E=E-1 : GOSUB62 : GOSUB62 : 
El=E+l:GOT085 

85 E=RND(8) :GOSUB62 

86 IF LL=0 THEN DRAWBM177 , 75 ;C4 
S4U10NF5G5" 

87 IF LL=1 THEN DRAWBM217 , 75 ;C4 
S4U10NF5G5" 

88 COLOR 4:LINE(X-4,Y-4)-(X+3 6,Y 
+22) ,PSET,B 

89 B$=INKEY$:IF B$=CHR$(32) THEN 
90 ELSE IF B$=CHR$(13) THEN 92 

ELSE 89 

90 X=X-40:E=E+1:IF E=9 THEN E=l 

91 GOSUB 62:GOT089 

92 IF E1=E THEN 94 ELSE 109 

93 'right answer 

94 COLOR1:LINE(180,140)-(211,183 
) ,PSET,BF:NN=ABS(NR-11) :NX=EX(NN 
) +210: CIRCLE (NX, EY(NN) ) ,5,CC(NN) 
+1 : PAINT (NX, EY (NN) ) , 1 , CC (NN) +1 : C 
IRCLE(NX,EY(NN) ) ,5,1 

95 FOR 1=150 TO 3 5 STEP -2 3:PUT( 
I, 155) -(1+54, 182) ,R1,PSET:S0UND1 
47, 2: LINE (I, 155) -(1+54, 18 2) , PSET 
, BF : NEXT : LINE ( 3 5 , 15 5 ) - ( 8 9 , 1 8 2 ) , P 
SET,BF 

96 IF NR=11 THEN 104 

97 PUT(35, 140)-(66, 183) ,R0, PSET 

98 CIRCLE (EX (NR) ,EY(NR) ) ,5,CC(NR 
) : PAINT (EX (NR) ,EY(NR) ) ,CC(NR) , CC 
(NR) :SOUND100,2:NR=NR+l:IF NL<5 
THEN NL=NL+1 

99 FOR DE=1 TO 500: NEXT DE 

100 COLOR1:LINE(35,140)-(66,183) 
, PSET , BF : PUT ( 180 , 140 ) - ( 2 11 , 18 3 ) , 
R0,PSET 

101 IF NL<3 THEN 72 ELSE IF LL=0 
THEN COLORl:LINE(X-4,Y-4)-(X+40 

,Y+3 6) ,PSET,BF 

102 IF LL=0 THEN NL=5:GOT078 ELS 
E 78 

103 'move rabbit off screen 

104 COLOR1:LINE(0,138)-(40,184) , 
PSET, BF: PUT (I ,155) -(1+54, 182) ,R1 
, PSET: GET (1+27, 155) -(1+54, 182) ,R 
l,G:SOUND147,3:LINE(I,155)-(I+54 
,182) , PSET, BF: PUT (0,155) -(27, 182 
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M si k I o s m. I-. e I 'Micro World J □ + 

CdCd ' s AFFORDABLE . _ . - 



CoCo II 
CoCo III 

Drive 


$87 

$169 

$235 


CM-8 Monitor 


$248 


Deluxe Joystick 
Mouse 
MultiPak 

Speech Cartridge 
CCR-81 Cass. Rec. 
Joysticks (pair) 


$24 
$40 
$75 
$35 
$42 
$9 



Disks (SS) 
Disks (DS) 



Includes free library case 



$7.50/box 
$8.00/box 



DMP-430 $545 

DMP-1 30A (1 20 CPS) $265 
DWP-230 $269 



Tandy 1000 EX 
Tandy 1000 SX 



$495 
$790 



VM-4 Monitor 
CM-10 Monitor 
CM-5 Monitor 



$99 

$360 

$240 



CoCo 3 512K Upgrade 
MultiPak Upgrade (26-3024) 
MultiPak Upgrade (26-3124) 



$130 
$8 
$7 



Please Not* - Our ads *r» submitted 
early, io pr-fc«a art subject to change!!! 
We appreciate your cooperation JV „ 
understanding In this matter. 



Method of Payment: 

MC. Visa, Am.Ex. - Sorry. No CitHlne! 

Certified Check or Money Order. 

Personal Checks - Allow 1 week to clear! 



Minimum order 15.00 



STRIKE tf>i&a®£ ILitSIF <&^<&atL£\3ilkl£ 
&® 2? ®3F1F &JLIL It&MDTi &mtWW£MiE. 

wm* asss <§mt &sjl yt&smnt w&mmw&mjs. 



* Full TANDY 

Warranty 

* 100% TANDY 

PRODUCTS 

* FREE Shipping 



==> CALL <= 
In Pa: 

215/759-7794 
In N.J. : 

201/735-9560 




COMPUTER CENTER 



MicroWorld 



230 Mooreslown Road, Wind Gap, PA 18091 
I.aneco Plaza, Clinton, N.J. 08809 



ALL PRICES INCLUDE SHIPPING ! ! ! 

100% TANDY EQUIPMENT WITH FULL 
RADIO SHACK WARRANTY 



) , Rl , PSET : SOUND147 , 3 : LINE (0 , 154 ) 
-(28,184) ,PSET,BF 

105 PLAY"L4T303EGP64GAECP64L2CL4 
AP6404CP64CD03AL8FP64L2FL16GP16G 
P16L4GP3 2L16GP16GP16L4GP3 2BAFAL2 
G" 

106 A$="PLAY AGAIN?" : DRAW" BM42,1 
30C3S8":GOSUB20 

107 A$=INKEY$:IFA$=""THEN 107 EL 
SE IF A$="Y" THEN 2 ELSE IF A$=" 
N" THEN CLS:PRINT@252,"BYE BYE!" 
:END ELSE 107 

108 'wrong answer 

109 A$="TRY AGAIN" :DRAW"BM50, 130 
C4S8":GOSUB20:FOR DE=1 TO 800 : NE 
XT DE:COLORl: LINE (49, 117) -(170,1 
31) ,PSET,BF:NL=NL-1:IF NL=-1 THE 
N NL=0 

110 IF NL<3 AND LL=1 THEN COLOR1 
:LINE(X-4,Y-4)-(X+40,Y+3 6) ,PSET, 
BF:NL=0:GOTO7 2 

111 GOT089 

112 CLS:PRINTSTRING$(32,175) ; : PR 
INT@480,STRING$(31,175) ; 

113 FOR 1=1056 TO 1535 STEP 32 :P 
OKE I, 175: POKE 1+31, 175 : NEXT I:P 
RINT@455, "one moment please"; 

114 PRINT@65,"HELP THE EASTER BU 
NNY FILL HIS"; : PRINT@ 12 9 , "BASKET 

BY TELLING HIM WHICH" ;: PRINT@ 19 
3," EGG COMES NEXT IN THE PATTERN 
. " ; : PRINT§257 , "PUSH THE SPACE BA 
R TO SELECT" ;: PRINTS 3 21, "THE EGG 
. PRESS enter WHEN THE" ; :PRINT@ 
390, "CORRECT EGG APPEARS."; 

115 GOT023 

116 PRINT@455,STRING$(17,32) ; : PR 
INT@457, "press any key"; 

117 IF INKEY$="" THEN 117 ELSE 7 
2 

118 'data for letters scale=8 

or higher, even #s only 



THE FLOPPY SOURCE 



3PRICE 
BREAK- 
THRU 

LIFETIME 
WARRANTY 



.59* EACH 
lO FOR. $ 4.95 

5 O FOR. $22.95 

SLEEVES, LABELS, W.P. TABS INCLUDED FREE I 




SEND CHECK / HONEY ORDER PAYABLE TO: 
THE FLOPPY SOURCE 
P.O. BOX 57431 OKC. OK. 73157 



OKLAHOMA RESIDENTS ADD 5.25% SALES TAX 
ADD $2.00 S/H IN U.S.A. - CANADA ADD $3.50 + $1.00 /LB 



119 

120 

R7" 

121 

6" 

122 

123 

124 

125 



DATA 
DATA 

DATA 



DATA 
DATA 
DATA 
DATA 
1L2BR6" 
12 6 DATA 
DATA 
DATA 



127 

128 
ii 

129 
130 
131 
132 
133 



DATA 
DATA 
DATA 
DATA 
DATA 



134 DATA 
13 5 DATA 
1G1L1BR6" 
13 6 DATA 

137 DATA 
2F1BR3BD5 

138 DATA 

13 9 DATA 

140 DATA 
BR3BD6" 

141 DATA 

142 DATA 

143 DATA 

144 DATA 

145 DATA 

14 6 DATA 

147 DATA 

148 DATA 

149 DATA 
2G1" 

150 DATA 

151 DATA 

152 DATA 



153 DATA 
H1L3" 

154 DATA 

155 DATA 
D1G1NL2F 

156 DATA 
F1R3" 

157 DATA 
3,200,25 
0,2,200, 

158 DATA 
8,4,9,17 
,171,2,6 
,24,165, 



U4E2F2D2NL4D2BR3" 
'U6R3F1D1G1NL3F1D1G1L3B 

•BR1H1U4E1R2F1BD4G1L2BR 

'U6R3F1D4G1L3BR7" 
'NR4U3NR2U3R4BR3BD6" 
'U3NR2U3R4BR3BD6" 
'BR1H1U4E1R2F1BD2NL1D2G 

'U3NU3R4NU3D3BR3' 1 

'BR1R1NR1U6NL1R1BR4BD6" 

•BU1F1R1E1U5NL1R1BR3BD6 

'U3NU3R1NE3F3BR3" 

'NU6R4U1BR3BD1" 

'U6F2E2D6BR3" 

'U6;M+5,+6;NU6BR3" 

'BR1H1U4E1R2F1D4G1L2BR6 

•U6R3F1D1G1L3BR7BD3" 
'BR1H1U4E1R2F1D3G1NH1NF 

'U6R3F1D1G1L2NL1F3BR3" 
■BU1F1R2E1U1H1L2H1U1E1R 

'BR2U6NL2R2BR3BD6" 

•BU1NU5F1R2E1U5BR3BD6" 

'BU6D2F1D1F1ND1E1U1E1U2 

•NU6E2NU1F2U6BR3BD6" 

'U1E4U1BL4D1F4D1BR3" 

'BU6D2F2ND2E2U2BR3BD6" 

'NR4U1E4U1L4BR7BD6" 

'BU5E1R2F1D1G2BD1D1BR5" 

'BR1BU5E1BR4BD6" 

•BU3R4BR3BD3" 

'BL1BD2R1NR1U6G1" 

■BD1BL2NR4U1E1R1E2U1H1L 

•BL2BD1F1R2E1H2E2H1L3" 

•BR1BD2U2NR1L3U1E3D4" 

•BD1BL2F1R2E1U2H1L3U2R4 

'BR2BU3H1L2G1D4F1R2E1U1 



'BL2BD2U1E4U1L4 11 
'BL1BD2H1U1E1H1U1E1R2F1 
1D1G1L2" 
"BD1BL2F1R2E1U4H1L2G1D1 

20,25,0,80,25,2,140,25, 
,4,20,60,3,80,60,3,140,6 
60,0 

12,178,2,18,178,3,24,17 
1,2,15,171,3,21,171,4,26 
,165,3,12,165,4,18,165,2 
3,30,165,4 /K\ 
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Woe be unto those he captures — he doesn 't take prisoners 





|ert hates barriers. Religious, 
ksocial, racial, economic, politi- 
cal ... it doesn't matter. Bert 
hates them all. Give him half a chance 
and he'll try to win over the Intolerants 
with his winning smile and cool logic. 
But throw a barrier in his way and look 
out. Bert gets mean, real mean. He'll 
leap into a nearby phone booth and 
emerge as Battling Blue Bert, Barrier 
Buster. 

Barriers shatter before him as he 
races after the bigotted and the narrow- 
minded within his range. Woe be unto 
those he catches. Battling Blue doesn't 
take prisoners. 

The only hope the Intolerants have is 
that Battling Blue will calm down and 
become his old, smiling, friendly self 

James Noble is a graphics programmer 
for the U.S. Navy. His work has re- 
ceived spots on national and public 
television as well as write-ups in several 
local papers and Defense Department 
periodicals. He holds a bachelor's de- 
gree in electronic engineering and has 
published nearly two dozen short sto- 
ries, mysteries and articles. 



before he reaches them, and that they 
can create enough barriers to prevent 
him from reaching another phone 
booth. 

The Intolerants are tricky. They look 
very much like Bert himself (except they 
don't smile). Often they hide behind the 
phone booths, or even each other, 
hoping the Barrier Busters won't find 
them. Sometimes they'll even stand in 
front of a phone booth so he can't see 
it to transform himself into Battling 
Blue. 

Ultimately, the goal of Bert is to 
break the confines of all prejudice once 
he has eliminated its supporters. 

Game Strategy 

Barrier Buster is an action game 
which will fascinate both children and 
adults for many hours. The game is 
designed with extensive usage of the 
random number generator function call 
(RND) to set up the playing area, thus it 
is highly unlikely that the player will 
ever play exactly the same game twice. 

The object of the game is simple. Bert, 
the smiling, blinking figure, must over- 
come the four Intolerants by occupying 



Battlin' 

Blue 

Bert 

By James A. Noble 



their positions. Once he has captured all 
four of them, he must break through 
one of the walls making up the playing 
area. 

Random barriers form during the 
course of play which Bert cannot break 
through in his normal form. In order to 
get to the Intolerants behind these 
barriers and in order to break through 
one of the walls of the playing area when 
he has captured them all, he must enter 
one of the four phone booths (by occu- 
pying its space) and be changed into 
Battling Blue Bert, capable of breaking 
through the barriers. Unfortunately for 
Bert, this transformation does not last 
for more than about seven seconds. 

Sometimes the Intolerants hide be- 
hind each other (two or three deep 
occasionally) or behind a phone booth. 
Many times they stand in front of a 
phone booth so the player can't see it 
(although if Bert captures the Intoler- 
ant, he also feels the effect of the phone 
booth). 

The game is designed for a CoCo with 
Extended BASIC. One joystick con- 
nected to the right joystick port is 
required. 

Once you've entered the program, 
simply type RUN to begin the game. A 
title page appears, then after a few 
seconds, the playing area, Bert, four 
Intolerants and four phone booths 
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Come meet 
CoCo Cat 
in person! 



eel the energy of the city. Fresh, provocative. 
This spring, there's another glittering light in 
the Chicago skyline — RAINBOWfestl 

Explore stimulating new ideas and broaden your 
horizons at RAINBOWfest, the only computer 
show dedicated exclusively to your Tandy Color 
Computer. The CoCo Community congregates 
April 10 to 12 at the Hyatt Regency Woodtield and 
we want you to join us. 

This is where commercial distributors gather to 
show off new and innovative products for the first 
time. Where RAINBOW authors and CoCo experts 
come to share their expertise in seminars and one- 
to-one chats. Where hardware and software sell 
for low RAINBOWfest prices. 

Set your own pace for visiting exhibits and at- 
tending the many free seminars on all aspects of 
your CoCo. You'll see demonstrations, have op- 
portunities to experiment with software and hard- 
ware, and meet with some of the most creative and 
forward-thinking people in the industry today. 
RAINBOW publisher and editor Lonnie Falk will 
be there along with many of the Falsoft staff, 
ready to answer your questions and give you the 
"inside scoop" on the CoCo. 

Only 15 minutes from O'Hare International Air- 
port, RAINBOWfest provides a perfect get-away 
weekend not only for the computer fanatic, but for 
the whole family. We're right across the street 
from the world's largest mall and just 30 minutes 
from downtown Chicago. 

The show begins Friday evening with the exhibit 
hall open from 7 p.m. to 10 p.m. Saturday's action 
is nonstop beginning with the 8 a.m. CoCo Com- 
munity Breakfast (separate tickets required). Our 
featured speaker is Greg Zumwalt, president of 
ZCT software. Exhibits and seminars will be in full 
swing from 10 a.m. to 6 p.m., and from 11 a.m. to 4 
p.m. on Sunday. That will be hardly enough time 
to see and do everything you'll want to, between 
scheduled events and our new Educational Sand- 
box for the kids — plus a special appearance by 
CoCo Cat, too! 

You can get RAINBOWfest tickets directly from 
THE RAINBOW. We'll include a reservation form 
so you can take advantage of the Hyatt Regency's 
special room rates of $60 for single or double oc- 
cupancy. 

For the same POSH treatment many of our ex- 
hibitors enjoy, have your travel arrangements and 
hotel reservations handled through RAINBOW af- 
filiate POSH Travel Assistance of Louisville. Call 
POSH at (502) 893-3311. All POSH services are 
available at no charge to RAINBOWfest patrons. 




Thai fun-loving 
feline is on the 
loose and ready 
lo meet the CoCo 
Community in 
Chicago 




# 



4 



■ Show Schedule: 




Friday evening 
— Exhibits open from 


7 p.m. to 10 p.m. I 


Saturday j 

' — CoCo Community Breakfast at 8 a.m. I 

— Exhibits open at 10 a.m. and close at | 


6 p.m. 




Sunday 
— Exhibits open from 


11 a.m. to 4 p.m. I 



HHI 



CoCo Community Breakfast 

Greg Zumwalt — CoCo 3 Programmer 
Our keynote speaker for the traditional CoCo Community Breakfast is Greg Zumwalt, 
one of the early CoCo specialists who has created everything from flight simulators 
to computer games. An independent programmer and computer designer, Greg is 
one of the few people Tandy has selected to write software for the new Color 
Computer 3. He owns ZCT Software, of Tulsa, Okla., and also writes software for 
business applications in such areas as aviation, the oil industry and the medical field. 



A A 



A SPECIAL EVENT! 



I' 

| I We are pleased to announce The Educational Sandbox, a joint Tandy/ 
I ] RAINBOW effort. This is a computer workshop for RAINBOWfest kids. 
| There will be two sessions on both Saturday and Sunday. One workshop 

i will be for the kindergarten through third-grade set, and the other for fourth | 

through seventh graders. Each workshop will last between 45 minutes and 
one hour, and will give the children and their parents hands-on experience 
in using Tandy computers and software. 



Free Seminars 

Cray Augsburg 

RAINBOW TECHNICAL EDITOR 

Intro to our Delphi CoCo SIG 
Dan Downard 

RAINBOW TECHNICAL CONSULTANT 

Hardware Projects 

A. Buddy Hogan 

INDEPENDENT PROGRAMMER 

Integrating CoCo 3 Into 
Organizational Work 

Dr. Michael Plog 

RAINBOW CONTRIBUTING EDITOR 

Educational Uses of the Machine 
Also, Statistics and the CoCo 

Dale Puckett 

RAINBOW CONTRIBUTING EDITOR 

Beginners Overview of BASIC09 
Also, Beginners Overview of OS-9 



Jim Reed 

RAINBOW MANAGING EDITOR 
Writing for Publication 

Dick White 

RAINBOW CONTRIBUTING EDITOR 
Spreadsheets for the CoCo 

Kevin Darling 
Carl Kreider 

INDEPENDENT PROGRAMMERS 
OS-9 Internals 

Erik Gavriluk 
Greg Miller 

THE MILLILUK PARTNERSHIP 

CoCo 3 Graphics 
William Barden, Jr. 

RAINBOW CONTRIBUTING EDITOR 

OS-9 Languages 



RAINBOWfest - Chicago, Illinois 
Dates: April 10-12,1987 
Hotel: Hyatt Regency Woodfield 
Rooms: $60 per night, single or double 
Advance Ticket Deadline: April 3, 1987 

Join us at a future RAINBOWfest! 

RAINBOWfest - Princeton, New Jersey 
Dates: October 9-11, 1987 
Hotel: Hyatt Regency Princeton 
Rooms: $86 per night, single or double 
Advance Ticket Deadline: October 2, 1987 

FREE T-Shirl to first five ticket orders received from each state. 
First 500 ticket orders received get the First Rainbow Book 
oMdranfures. 

Authors Dale Puckett, Peter Dibble and Dr. 
Michael Plog will be autographing copies of 
their books both days in the exhibit hall. 



Bill Bernico 

INDEPENDENT PROGRAMMER 

Writing in BASIC 

Peter Dibble 

PROGRAMMER AND AUTHOR 
OS-9 Level II 

Art Flexser 

PRESIDENT, SPECTRO SYSTEMS 
Adding Features to 
the BASIC ROMS 

John Ross 

ROSS COMPUTER SERVICES 

Telecommunications 
Mark Siegel 

TANDY PRODUCT MANAGER 

Selling Programs to Tandy 
Martin Goodman, M.D. 

RAINBOW CONTRIBUTING EDITOR 

CoCo Consultations Line 
Also, Custom CoCo 1, 2, 3 



YES, I'm coming to Chicago! I want to save by buying tickets now at the special advance sale price. Breakfast 

tickets require advance reservations. 

Please send me: Name (please print) 

Three-day tickets at $9 each total 



One-day tickets at $7 each total 

Circle one: Friday Saturday Sunday 

Saturday CoCo Breakfast at $12 each total 

Handling Charge $1 $ 100 

TOTAL ENCLOSED 

(U.S. Currency Only, Please) 
D Also send me a hotel reservation card for the Hyatt Re- 
gency Woodfield ($60, single or double room). 



Telephone ZIP _ 

Company 

□ Payment Enclosed, or Charge to: 
□ VISA □ MasterCard □ American Express 

Account Number 



Exp. Date 
Signature 



Advance ticket deadline: April 3, 1987. Orders received less than two weeks prior to show opening will be held for you at the door. Tickets will also 
be available at the door at a slightly higher price. Tickets will be mailed six weeks prior to show. Children 4 and under, free; over 4, full price. 

Make checks payable to: The RAINBOW. Mail to: RAINBOWfest, The Falsoft Building, 9509 U.S. Highway 42, P.O. Box 385, Prospect, KY 
40059. To make reservations by phone, in Kentucky call (502) 228-4492, or outside Kentucky call (800) 847-0309. 



appear. If any of the figures fail to 
appear, it means that one or more of the 
Intolerants or phone booths is hidden 
or has been captured immediately (hid- 
ing behind Bert). Check for small yellow 
markers along the left border. A marker 
will appear each time an Intolerant is 
overcome. 

Using the joystick, maneuver Bert 
(the smiling yellow figure) between the 
points marking the rows and columns 
of the playing area and around the red 
barriers which are forming, and over- 
come the Intolerants (the yellow 
frowners) by positioning him over their 
locations on the playing area. Be certain 
you cover each Intolerant completely. 
Leave any piece behind and you won't 
score a capture. 

Should Bert or an Intolerant become 
trapped behind the forming barriers, 
move Bert to a phone booth and he will 
be transformed. For the next seven 
seconds, Blue Bert may crash through 
the barriers to reach the Intolerant, but 
be careful. The barriers can reform 
themselves and can trap Bert after he 
has returned to his smiling, mild- 
mannered self. 

Once you have captured all four 
Intolerants, you must penetrate the 
outer wall of the playing area in order 
to win the game. This can only be 
accomplished if you have captured all 
four Intolerants and are Battling Blue 
Bert (so keep a phone booth in reserve 
to break through the playing area). 

Should Bert become hopelessly sur- 
rounded, press BREAK to end the game. 
Type RUN to play again. 

Count your phone booths and Intol- 
erants when the game begins. There 
should be four of each. If not, look for 
the markers on the left edge. They will 
indicate whether one or more of the 
Intolerants was captured immediately 
because it occupied the same row and 
column position as Bert. If that is not 
the case, one or more of the Intolerants 
is hidden and that will affect your play. 
U nless you score more than one capture 
when you pick up all the visible Intol- 
erants, you will have to go around 
searching the phone booths to pick up 
the hidden ones. 

If Bert appears at the beginning of the 
game as Battling Blue, it indicates one 
of the phone booths occupied Bert's 
position. If not, it means that a phone 
booth is hidden behind another or that 
it's behind an Intolerant. This will effect 
your play also. 

Go for the Intolerants early in the 
game while there are few barriers. You 
won't get the chance later on when you 
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will need a phone booth for just about 
every action you make. 

Given a choice, stay close to the outer 
wall. The probability of a random 
barrier appearing along the outer wall 
is half that of barriers appearing any- 
where else. 



"Go for the 

Intolerants early in 

the game while there 

are few barriers. You 

won't get the chance 

later on when you will 

need a phone booth 

for just about every 

action you make. " 



The Program 

The first four lines of the program 
provide a title page for the user to look 
at while the variables are being initial- 
ized and graphics figures are being 
created (lines 50 through 450). The 
playing field and figures are revealed by 
the SCREEN command on Line 460. 
Lines 470 through 670 mark the main 
iterative loop for the action which takes 
place. 

First, the position of Bert on the 
playing field (XM and YM) is compared 
with the position of each of the four 
Intolerants (XO and YO) and the four 
phone booths (XN and YN) in a local loop 
running from lines 470 to 500. Should 
Bert's position correspond to that of an 
Intolerant, a subroutine call is made to 
Line 940 where the horizontal variable 
of the Intolerant's position is changed 
to zero. This essentially takes the Intol- 
erant out of the field of play. A PSET 
instruction at Line 950 changes a blue 
dot along the left border into yellow to 
mark the capture of the Intolerant. 

Should Bert's position match that of 
a phone booth, a subroutine call is made 
to Line 850 where the phone booth is 
removed in similar fashion so that it 
may not be reused. 

A combination down-counter varia- 
ble and flag (BF) is set to 20 to initiate 
and maintain Bert as Battling Blue. See 
lines 590 and 650 where BF is checked 
and note the subroutine lines they call. 
When BF is not zero, the ELSE portion 
of an IF-THEN-ELSE statement on Line 



780 calls a subroutine at 800 which 
loads up the Battling Blue figure with 
a PUT. Additionally, the BF flag is 
reduced by a count of one. 

The Kfl variable in Line 510 adds all 
of the Intolerants' horizontal positions. 
If all of the Intolerants are captured, 
then Kfl will equal zero and can be used 
later as a flag to permit Battling Blue to 
penetrate the outer wall of the playing 
area if he is so inclined. 

In Line 520, the random vertical 
position for the starting point of the 
barrier wall to be drawn is selected 
(RND(G)*24 + 12). Likewise for the 
starting horizontal position (RND 
(8)*24+20). These are converted to 
string variables by STRS function calls. 
The additions of 12 and 20 are merely 
offsets to center the barriers on the 
screen. The multiplication by 24 is to 
keep beginning position of the barrier 
wall to be drawn at evenly spaced 
positions (the distance between the rows 
and columns) over the playing area. The 
direction and distance the barrier is 
drawn is selected by randomly choosing 
one of four array string variables 
( 1 1 ( RND ( 4 ) ). These were initially set to 
U24, D24, L24 and R24 in lines 130 and 
140. Place DRAW and BM at the beginning 
and you end up with the complete 
instruction: 

DRAW'BM "+STRS ( RND ( 8 ) *24+20 ) 
+ " , "STRS ( RND ( G ) *24+12 ) +IS 
(RND(4)) 

Let's assume RND(B) generates a 
number 4 on one pass, RND(G) a 1 and 
RND ( 4 ) a 2. Solving for the equation we 
have: 

DRAW ~BtT+STR$(llG) + ","+STR$ 
(3G)+I$(2) 

Now convert the computed numbers to 
strings and replace I$(2) with the 
proper string constant. 

DRAW "BM"+"llG"+","+"3G"+ 
"D24" 

Remove the pluses and we get: 

DRAW "BM11G,3GD24" 

Many will recognize this as a stand- 
ard Extended BASIC DRAW command 
which draws a line from Position 116 
horizontal and 35 vertical, down 24 
positions. What we have done is created 
a BASIC command on the fly and then 
executed it. The interpreter makes this 
sort of controlled random drawing 
possible. 



Next, the horizontal and vertical 
position of the joystick is read and 
tested. Depending on these values, IX 
and IY are each set to -12, or +12. 
These numbers are significant in that 
they determine Bert's or Battling Blue's 
movements left, right, up or down by 
IX'2 or IY/2 (lines 680, 700, 730, 780) 
plus they are employed to test for a red 
barrier impeding Bert's movements in a 
PP0INT instruction (lines 680 and 730). 

Should Bert be changed into Battling 
Blue, the PP0INT test is left out and his 
movement is unimpeded (lines 700 and 
780) thus permitting his movement to 
overrun barriers and thereby eliminate 
their appearance on the screen. 



To keep Bert (or Battling Blue) in the 
center of the rows and columns of the 
playing field, two variables, XT and YT, 
are employed in the following manner: 



XR=(XM-B)'24 
XT=XR-INT(XR) 



YR=(YMK24 
TY=YR-INT(YR) 



The INT function converts XR and YR 
to integer. This eliminates any decimal 
fractions. YT and XT will be zero only 
when Xl*1 and YN (plus their constants to 
center the playing area) can be divided 
evenly by 24. YT and XT can then be used 
to determine if Bert can be moved 
vertically (XT=0) or horizontally (TY=0). 

If Bert has overcome all the Intoler- 



ants (Kfl=0), his position is checked to 
see if he exceeds the confines of the 
playing area (Line 660). If so, the 
winning message is displayed. 

There you have it. Don't forget to 
save your program on tape or disk. And 
remember when you start designing 
your own programs that some instruc- 
tions employing strings can be con- 
structed of variables and constants 
generated by the program itself. Good 
luck! 

(Questions about this program may 
be directed to Mr. Noble at 163 Rolling 
Road, Lexington Park, MD 20653. 
Please enclose an SASEfor a reply. )U 



//™.. 


....48 


490 .. . 


...189 


750 .. . 


...180 


END . . 


181 





The listing: BLUEBERT 



1)3 

20 
30 

rpll 

40 
50 
60 
70 
80 
90 

100 
110 
120 
130 
140 
150 
160 
170 



CLS 
SCREEN 



0,0 



PRINT @ 167, "BATTLING BLUE BER 



PRINT@264, 

PMODE 1,1 

PCLS 

DIM IS(4) 

DIM XN ( 4 ) : 

DIM XO(4) : 



" 'BARRIER BUSTER" 1 



DIM YN(4) 
DIM YO(4) 
DIM VC(0,28):DIM V(0,28) 
DIM 0(0,28) :DIM B(0,28) 
DIM VB(0,28) 
I$(1)="U24":I$(2)="D2 4" 
I$(3)="L2 4":I$(4)="R24" 
GET (2,2)-(22,22) ,VC,G 
COLOR 2,1 

DRAW "BM34,2R16D20L16U20D6BR 
4R2BR4R2BD2BL4D4BD4BR4L8" 
180 GET (32,2)-(52,22) ,0,G 
190 DRAW "BM64,2R16D20L16U20D6BR 
4R1BR7R1BD4BL4L1BL4BD2D2R8U2" 
200 GET (62,2)-(82,22) ,V,G 
210 COLOR 3,1 

220 DRAW "BM94,2R16L2D20L12U20D1 
0R12" 

230 GET (92,2)-(112,22) ,B,G 
240 DRAW "BM124,2R16D20L16U20BD4 
BR4R8BD2BL1L1BL3L1BD4BR2R0BD4BL4 
R8" 
250 GET (122,2)-(142,22) ,VB,G 



2 60 

270 

280 

8" 

290 

300 

310 

320 

330 

340 

350 



PCLS 

COLOR 

DRAW "BM20,12R216D168L216U16 



4,1 



,3,4 



-10)-(XO( 
-10)-(XN( 



PAINT (0,0) 

FOR V=l TO 4 

XN(V)=24*RND(8)+32 

YN(V)=24*RND(6)+24 

XO(V)=2 4*RND(8)+3 2 

YO(V)=24*RND(6)+24 

PUT (XO(V)-10,YO(V) 
V)+10,YO(V)+10) ,0,PSET 
3 60 PUT (XN(V)-10,YN(V) 
V)+10,YN(V)+10) ,B,PSET 
370 NEXT V 

FOR V=l TO 8 

FOR Z=l TO 6 

PSET(20+24*V,12+24*Z,4) 

NEXT Z:NEXT V 

XM=2 4*RND(8)+32 

YM=24*RND(6)+24 

CX=XM:CY=YM 

CLS 

SCREEN 1,0 

FOR Z=l TO 4 

IF (XM=XN(Z) 

GOSUB 850 

IF (XM=XO(Z) 

GOSUB 940 

NEXT Z 

KA=XO ( 1 ) +XO ( 2 ) +XO ( 3 ) +XO ( 4 ) 

DRAW "BM"+STR$(RND(8)*24+20) 
+","+STR$(RND(6) *2 4+12)+I$(RND(4 

)) 

530 J1=JOYSTK(0) : J2=JOYSTK( 1) 

IX=0 

IF Jl<2 THEN IX=-12 

IF Jl>61 THEN IX=12 

YR=(YM)/24 



380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
HEN 
490 
HEN 
500 
510 
520 



540 
550 
560 
570 



AND YM=YN ( Z ) ) T 
AND YM=YO(Z) ) T 
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Those Great RAINBOW Programs 

Without All the Fuss! 
Subscribe to RAINBOW ON TAPE! 



Every month, rainbow on tape brings as many as two dozen ready-to-run 
programs right to you. Using the current issue of the rainbow as documen- 
tation, all you have to do is load and run them. Just a one-year subscription 
gives you more than 230 new programs! The typing time saved is time that 
can be spent with the CoCo. (rainbow on tape does not include OS-9 
programs or those less than 20 lines.) 



Need a back issue of rainbow on tape? 
Issues available beginning with April 1982 



Subscribe to rainbow on tape Today! 

LOOK FOR OUR ORDER CARD 
BETWEEN PAGES 34 AND 35 

The cost for a single copy of rainbow on 
tape is $10 within the United States; U.S. $12 
in all other countries. The annual subscription 
rate for rainbow on tape is $80 within the U.S.; 
U.S. $90 in Canada; and U.S. $105 for all other 
countries. U.S. currency only, please. In order 
to hold down non-editorial costs, we do not 
bill. 




DISK USERS: RAINBOW ON DISK 
IS NOW AVAILABLE! 

All the programs from the rainbow — includ- 
ing OS-9 — are now available on disk. For 
more information, see Page 168 of this issue. 



NOW AVAILABLE ON DELPHI! 

For your convenience. RAINBOW ON TAPE can also be 
ordered via the Delphi Information Network, in our Shopping 
Service area of THE RAINBOW'S Color Computer SIG (Special 
Interest Group). 

The individual programs from our past April issues are also 
available for immediate download in the rainbow on tape 
Database area in THE rainbow's Color Computer SIG on 
Delphi. There is a $3.50 per program surcharge. 



RAINBOW ON TAPE is not a stand-alone product, but is 
intended as an adjunct and complement to the magazine. 
Even if you purchase RAINBOWONTAPE, you will still need 
the magazine for loading and operating instructions. 

To order by phone, (credit card orders only) call 
(800) 847-0309, 8 a.m. - 5 p.m. EST. All other 
inquiries call (502) 228-4492 



Programs from Our Past April Issues: 



April 1986 — The CoCo Zone, Adventure contest Grand Prize 
graphics winner; The Maze of Moycullen, Adventure Contest 
16K winner; IRA/Keogh Estimator, a financial planning 
program that allows for payroll deductions; House Value, a 
program to assess the market value of your home; College 
Expense, shows how to save for a child's higher education; 
Refund-A-File, a filing program for the avid and occasional 
refunder; Electrical Cost Calculator, figures cost projections 
on home utilities; Plantlog, a database for individual plant 
requirements; Bassmate, a program that produces the right 
lure to use by entering water conditions; CoCo-Handiman, a 
utility to estimate materials and costs for home improve- 
ments; Shoplist, prints a shopping list by entering meal 
menus; and Life Skill II, helps analyze the place value of 
numbers and digits. Plus eight additional programs. 

April 1985 — CoCo Payroll, part two of a complete small 
business payroll system; Landlord's Helper, part two of a 
program that manages rental property; Surface, a Simulation 
that takes you to the North Pole; Cardio, a Simulation that 
transforms you into a heart specialist; The Adventure Writer's 
Toolkit, offers routines for writing your own Adventure; Run 
lor Your Life, a survival game; Concert, an animated graphics 
program; and Porsche, a graphics representation of the 
Porsche 930 Turbo. Plus five additional programs. 



April 1984 

(gambling] 



- Seventeen programs from our Gaming 
issue. 



580 


YT=YR-INT(YR) 


59J3 


IF BF=0 THEN GOSUB 680 ELSE 


GOSUB 100 


600 


IY=0 


610 


IF J2<2 THEN IY=-12 


620 


IF J2>61 THEN IY=12 


630 


XR=(XM-8)/24 


640 


XT=XR-INT(XR) 


650 


IF BF=0 THEN GOSUB 7 30 ELSE 


GOSUB 780 


660 


IF XM>2 30 OR XM<2 6 OR YM>17 4 


OR 


YM<18 THEN GOTO 9 70 


670 


GOTO 470 


680 


IF PPOINT(XM+IX,YM)<>4 AND Y 


T=0 


THEN XM=XM+IX/2 


690 


RETURN 


700 


IF YT=0 THEN XM=XM+IX/2 


710 


IF KAO0 THEN GOSUB 880 


720 


RETURN 


730 


IF PPOINT(XM,YM+IY)<>4 AND X 


T=0 


THEN YM=YM+IY/2 


740 


PUT (CX-10,CY-10)-(CX+10,CY+ 


10), 


VC,PSET 


750 


PUT (XM-10,YM-10)-(XM+10,YM+ 


10) 


V,PSET 


760 


CX=XM:CY=YM 


770 


RETURN 


780 


IF XT=0 THEN YM=YM+IY/2 


790 


IF KAO0 THEN GOSUB 910 


800 


PUT (CX-10,CY-10)-(CX+10,CY+ 


10) 


VC,PSET 


810 


PUT (XM-10,YM-10)-(XM+10,YM+ 


10) 


VB ; PSET 


820 


CX=XM:CY=YM 


830 


BF=BF-1 


840 


RETURN 


850 


XN ( Z ) =0 


860 


BF=20 


870 


RETURN 


880 


IF XM>2 24 THEN XM=224 


890 


IF XM<32 THEN XM=3 2 


900 


RETURN 


910 


IF YM>168 THEN YM=168 


920 


IF YM<24 THEN YM=2 4 


930 


RETURN 


940 


XO(Z)=0 


950 


PSET(10,Z*30,2) 


960 


RETURN 


970 


PCLS 


980 


PRINT @ 2 2 5," BERT BASHES THE 


BARRIERS AGAIN" 


990 


FOR 1=1 TO 1400: NEXT I 


1000 CLS 


1010 STOP 




/R\ 



The CoCo Bookkeeper 

A Complete Bookkeeping Package For Ine Color Computer 

FEATURES: 

* MtOM WSOlUTtON CMSPIAV • A 51x21 hues screen w"tn true upoor 
cose choiocters 

" HJSlNESS OPlf NIID • All popukj' teagers ana journals oie included (Ooutm* 
entry uGneroHournai general ledger Ap AP sales pure noses cosn receipts & 
CHsourserrienti Income & expense staterr-eni tnal poionce Dan» recon- 
dilation, year-end closings & openings 

1 USCT-fWtNDAY- The pfog'omlscinvenbv pop-op menus Iionslet tiom any one 
ledger /lournai to ony ome« Is occomprishea wtin one or two keystrokes 

" POWERFUL • Use* has tne option of narmot or "Megaaas" operation Meg-Ddos 
provides an Initial 2M gionuies or itoroge on a specoiiy larmotied rjis»etie 
(incluOeO with me program) and 6 millisecond operational speed This 
ptogram Is designed to recognUe disk storage space as memory " " wtl1 wrTl& 
and read flies up to 252 granules (560K) lorg 

* UMPllOTY • All postings are Initially mode to the general journal Postings to ai 1 
othei Journals and ledgers. Including preparation of a tnal Potonce and me 
itatemenf of Income and eipense Is a tutty outomatc. menu-conftouea 
function 

' fWMIlBRINCflON-rheusercanoDlolnohoiaf.opyofony won- produced L>, 
me program Changes of baud rale (300-9600) ore occomp'isnea wr*h o 
»Jngko keystroke 

* DOCUMENTATION • Complete and comprehensive documentation covering 
aver* aspect of opetallon is supp-KKJ in simple, non-technical lenra Acluo. 
"koyabie'' e»amp*es ore given throughout 

The CoCo Bookkeeper operates according to generally occepied 
accounting procedures tl will take a business from opening day to me 
final balance sheet and profit and loss statement at income tax time. 
then open tne books tof the following year 
32K and one disk drive required Supports multi-drive systems 
CoCo 2, 3 Compatible 



^79.95 



White Fire 

Of Eternity 




WfltRnkoUMK 
wjom o n lma f d oroohic 
odv»ntu»» In an aoe ot 
magic and mormon, you 
on led In tn» farotacte" 
wood) trying »o qb> out. 

Dlric $24.95 



* 3" Diskette 

For Only 



Adventure In 

Mythology 

By Scott Cabit 

An animatec gronn rs scventu'e 
Bonie monste's ona aiscovei treasures 
as you assurrv= ;ne personalities of 
various hefoes i> ancient Greek myfh- 
tr«yi vou gooi is 'C .. - »>e nana ot me 
beautiful Afaiama the swtfi-njnmnQ 
hunriess Bui Debate o' mo pedis ana 
obstacles thai stand in voui way os you 
tourney through oncreni G'eece' four 
voice music ana sauna eftocls auto- 
matic speech when using a lanOv SSC 
speech pok Load ana Save feature 
over ?50 locations 6*SK Mochme lan- 
guage 

Tape $21.95 Dlik $24.95 



The Andrea CoCo 

By Aft Martin 

Another great animated graphics 
oaventure! All you came down to tne 
Yacht CiuD tor was to get a onnk ana 
mayoe ploy a little poke' Heck 
noboay would ever guess that tne 
closest thing vou owned to a real vocnt 
was the one over your firep<oce It was 
in the bar tna< vou heora rumors o' 
earth- shattering events odou* to take 
ploce You stop out onto the wnarf to 
get o iittio air when you' natu'O' 
curiosity onO sense o' oaveniu'e star* 
lo work Con you save t^ti world" 
Superb graphics, save & loac feature 
MK. one Qisk oVive required 



Disk $24.95 



•49.95 



DSDO - S3.00 S & H (Box 10) and Many more 



Ssciudro 4137 e Bermuda 

*""J?ZJJ* % "' W Tucson, AZ 85712 

Software <«»> a»i-*786 



(Shipping - H.50 Each In U.S. 



COD. Order Add $3.00 
Arizona Residents Add 7% Tax • Dealer Inquires Invited 

Call Or Write For Free Catalog) 
Authors- We're Seeking Good Software Now! 
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BASIC TRAINING 




Exploring CoCo Graphics 



By Joseph Kolar 
Rainbow Contributing Editor 



What better way to prepare you 
beginning CoConauts for a 
voyage through CoCo graph- 
ics than to whet your appetites with a 
preview of coming adventures? 

Belinda Ramsey, my vivacious dance 
instructor at the Fred Astaire Fran- 
chised Dance Studio in Inverness, 
Florida, gave me the original idea and 
inspired and encouraged me to develop 
the forthcoming series of 20 tutorials 
concerning the graphics capabilities of 
the old 16K, ECB, cassette-based 
CoCo. 

Belinda pushed and prodded me to 
keep creating. So, what better way to 
show my appreciation for her support 
than to give her recognition? 

To keep the newcomer salivating in 
anticipation of working with the new 
fun graphics series, we will present a 
graphics panel to perform double duty. 
A heartfelt thank you to Belinda Ram- 
sey and a tutorial for the patient new- 
comer to CoColand. 

Key in Listing I. Using the Hi-Res 
screen in Line 10, beginning at location 
0,0 in steps of 2 units, we drew a moire 
design around a central point, 128,96, 
in a clockwise direction in lines 20 
through 90. 

Four separate LINE loop routines 
were used to move J around the screen. 

We drew the Roman font letters that 
comprise the name "Belinda Ramsey" 
and assigned them variable names of 
our choice in lines 100 through 200. In 
Line 210, we located and placed the 
letters onto the screen, in size SB, using 
concatenation. 

Now run this. Note in the lower right- 
hand corner, a pause makes the display 



Florida-based Joseph Kolar is a veter- 
an writer and programmer and special- 
izes in introducing beginners to the 
powers of the Color Computer. 
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hang up for a second before continuing 
on to completion. 

Save Listing l. Before you enter NEW, 
let's fool around. Change the 2 to 4 in 
lines 20 and 60, then run and press 
BREAK. Now, try changing the 4 to a 3 
in lines 20 and 60, and run. Why is 4 
the preferred value instead of 3? Press 
BREAK. Why can't you use A in place of 
2 in lines 40 and 80? Try it and see! 

Restore the original 2 in lines 20, 40, 
60 and 80, and run. Look at the pause 
that results as CoCo reaches 255,191 
in (he lower right-hand corner. Now 
press BREAK. 

Keep in mind that we are in a creative 
frenzy. Suppose we wanted to begin at 
255 , 191 and go in a clockwise direction 
in order to eliminate that glitch? This is 
one way to make the display appear 
smoothly. On your own, figure out how 
to rearrange lines 20 through 90 to 
create this desired effect. 

Look at Listing 2. If you prefer, 
replace lines 20 through 90 in Listing I 
with those in Listing 2. Change LINE0 
and run. I like this placement better 
because after the moire border is com- 
pleted, CoCo jumps up and to the left 
to display the text. Do you want to save 
Listing 2? 

The sad fact in this true-life situation 
is that the glitch in Listing 1 was an 
undetected homemade error by yours 
truly, which was overlooked in the loop 
that created the right side of the border. 
Line 40, in Listing I. The value, 255 
should have been 191. The glitch oc- 
curred because CoCo dutifully marked 
time by counting from 191 through 255 
by 2s, (Step 2), where nothing could 
happen except letting time elapse. (This 
anomaly of CoCo's will be discussed in 
one of the tutorials.) This was corrected 
in Line 80 in LISTING2, my preferred 
version. You may also want to change 
lines 20 and 60 from 2 to 4. 

Finally, you may want to type NEW 



and load "LI ST I NG1" and remove the 
glitch. If I had done this in the first 
place, I would never have gone on and 
created LISTING2, which suits my 
aesthetic sensibilities a bit more. Moral: 
Experiment and wander off into un- 
charted territory. The chances are good 
that you will have more fun, create 
something new and learn something 
exciting about CoCo's foibles. 

The brave newcomer may want to 
create the text that spells out his/her 
name and dedicate this tutorial panel to 
him/ herself. Be my guest! 

Note that Line 10 looks strange. You 
could add ,1 after 4 and also after 1 
without changing the resultant Hi-Res 
display. CoCo is forgiving and recog- 
nizes the abbreviated Line 10 as the 
default condition. 

I am going to share my favorite 
graphic with you. Sometimes, 1 call it 
L0VEKN0T. At other times, it is 2SNRKES 
or TAPEWORM, depending on how cranky 
I am. It is Listing 3. This animated 
graphic uses GET-PUT statements to 
achieve this spectacular effect. I like to 
imagine that it depicts two tapeworms 
that are writhing around in a glass jar, 
always keeping a weather eye on me. 

They are made to slither in opposite 
directions, growing longer and longer 
until they become one intertwined 
Gordian knot. Notice that the eyes and 
mouth of both critters alternate colors 
in a random fashion. 

If you get bored with their antics, 
change - to + in Line 110, or change 
Line 120 to read either K=90-C*R-'90 or 
l<=45-C»R/'90. To get an optical illu- 
sion, try changing * to + in Line 120. 
Make saves as desired. Type NEW. 

Speaking of optical illusions, one day 
when the screen was blank, in the Hi- 
Res mode, 10 PMODE 4, 1:SCREEN1, 
1:PCLS, and my mind was in a fog, I 
began near the center of the screen with 
20 DRflW"SBBM120,102U10R 



DeskMate® T-in-l software 

makes your Color Computer 

better than ever. 



Now our popular DeskMate® 
software is available for disk-based 
Color Computers! DeskMate 
(26-3259, $99.95) features seven 
popular personal-productivity 
programs — all on one disk! A 
general-purpose TEXT entry and 
editing program is ideal for writing 
correction-free letters, memos and 
short reports. LEDGER, a simple 
spreadsheet program, helps you do 
budgeting, sales forecasting, profit- 
and-loss projec- 
tions and other 
•'What if . . . ?" 

calculations. Us- 

j ing the four- 

color PAINT 
CALENDAR picture editor, 



Bin urni lain yccrjUU 




LEDGER 



you can create 
colorful charts, 
graphs, designs 
and "doodles" 
on your screen. 
Print a copy on 
a dot-matrix or 
ink-jet printer. 




The INDEX CARDS personal filing 
system lets you enter and edit data 
and perform simple sorts and search- 
es. It's ideal for keeping track of 
names and ad- 
dresses. TELE- 
COM gives yon 
access to na- 
tional informa- 
tion services, 
TELECOM plus transmits 






and receives 
files from other 
computers by 
phone (requires 
modem). A sim- 
ple 'monthly cal- 

index cards endarprogram 

displays to 
do's" for any date. CALENDAR is 
an easv way to organize your day. 
A four-function CALCULATOR is 

available within the operations of 
any application. 

Don't have a 
disk drive? You 
can add one for 
just $299.95. 
(26-313f). 
TEXT EDITOR Come in today! 

Radio /hack 

The Technology Store" 

A DIVISION OF TANOY CORPORATION 



Send me an RSC-18 
Software Reference Guide. 

Mail To: Radio Shack, Dept 87-A-7I7 
300 One Tandy Center, Fori Worth. TX 76102 
Name 




Address . 
City 



.ZIP. 



Prices apply at Radio Shack Compuler Centers and par- 
ticipating stores and dealers. DeskMate/Registered TM 
Tandy Corp. 



10D20L20U30R30D4 0L40U50R50D- 
G0LG0U70R70 and 100 GDTO100. I 
doodled an expanding square, and as 
the cobwebs settled on my mind, my 
fingers hovered over the keyboard 
uncertain what to try next. The fog 
lifted a mite and 1 decided to continue 
Line 20 with DG0L10H30 to get to the 
middle of the expanding square. I 
continued to doodle by adding 
BD10F30" to go back to the outer edge. 
Then, 1 started a new line, 30 DRAW 
"R10U10H30". This brought me back to 



the center with a nearly completed 
three-dimensional bar. As I gazed in- 
tently at the design to try to figure out 
what my next move would be. 1 was 
astounded to notice that sometimes the 
bar tended to point toward the center 
from the outside and at others it re- 
versed field and seemed to project 
outward. I left it incomplete and en- 
titled it 0'<OPTICflL ILLUSION. 

If you copy lines 0, 10 and 100 and 
then slowly add the elements in lines 20 
and then 30, you will see how a fog- 



enshrouded mind works. Make sure 
after each new directional addition that 
you add a closing quote mark. 

The point I want to make is that you 
never know what will happen when you 
play around with CoCo and try to trick 
him into creating some fun thing. Pre- 
pare to have a lot of fun and get max- 
imum usage out of your faithful Color 
Computer. □ 



Listing 1: BASIC 1 

'<LISTING1> (DEDICATION TO 

BELINDA RAMSEY) 

5 CLEAR500 

10 PMODE4:PCLS:SCREENl 

20 FOR J=0TO255STEP2 

30 LINE(J,0)-(128,96) ,PSET:NEXT 

40 FOR 3=0 TO 255 STEP2 

50 LINE(128,96)-(255,J) ,PSET:NEX 

T 

60 FOR J=255 TO STEP-2 

70 LINE(J,191)-(128,96) ,PSET:NEX 

T 

80 FOR J=191 TO STEP-2 

90 LINE(0,J)-(128,96) ,PSET:NEXT 

100 KB$="U6R3FDGNLNL3FDGNL3BR4" 

110 E$="BRHU2ER2FDL3BD2R2NEBR4" 

120 L$="BU6RD6NLRBR3" 

130 I$="RNRU4LBURBD5BR4" 

140 N$="BU4FND3ERFD3BR3" 

150 D$="BRNR2HU2ER2FD2NGDU6RBD6N 

LBR3" 

160 A$="BU4R3FDHL2GDFR2ENU2FBR3" 

170 KR$="U6R3FDGL2NLF3BR3" 

180 M$="BU4FND3ERFND3ERFD3BR4'" 

190 S$="BUFR2EHL2HER2FBD3BR3" 

200 Y$= ,, BUNU3FR2ENU3D2GL2HBUBR7" 

210 DRAW"C2S8BM86,90"+KB$+E$+L$+ 

I$+N$+D$+A$+FA$:DRAW"BM86,110"+K 

R$+A$+M$+S$+E$+Y$ 

220 GOTO220 

Listing 2: BASIC 2 

'<LISTING2> (REVISED DEDICA- 
TION TO BELINDA RAMSEY) 
5 CLEAR500 
10 PMODE4:PCLS:SCREENl 

FOR J=255 TO STEP-2 

LINE (J, 191) -(128, 96) ,PSET:NEX 



20 

30 

T 

40 

50 

60 

70 

80 



FOR J=191 TO STEP-2 
LINE(0,J)-(128,96) ,PSET:NEXT 
FOR J=0 TO 255 STEP2 
LINE (J, J3) -(128,96) ,PSET:NEXT 
FOR J=0 TO 191 STEP2 



KB$= 
E$=" 
L$=" 
I$=" 
N$=" 
D$=" 



"U6R3 FDGNLNL3 FDGNL3 BR4 " 

BRHU2ER2FDL3BD2R2NEBR4" 

BU6RD6NLRBR3" 

RNRU4LBURBD5BR4 " 

BU4FND3ERFD3BR3" 

BRNR2HU2ER2FD2NGDU6RBD6N 



90 LINE(128,96)-(255,J) ,PSET:NEX 

T 

100 

110 

120 

130 

140 

150 

LBR3" 

160 A$="BU4R3FDHL2GDFR2ENU2FBR3" 

170 KR$="U6R3FDGL2NLF3BR3" 

180 M$="BU4FND3ERFND3ERFD3BR4" 

190 S$="BUFR2EHL2HER2FBD3BR3" 

200 Y$="BUNU3FR2ENU3D2GL2HBUBR7" 

210 DRAW M C2S8BM86,90"+KB$+E$+L$+ 

I$+N$+D$+A$+FA$:DRAW"BM86,110"+K 

R$+A$+M$+S$+E$+Y$ 

220 GOTO220 

Listing 3: LOVEKNOT 

■ LISTING3 (LOVEKNOT) 

10 ' (C) 1984, J. KOLAR 

20 PMODE4:PCLS 

30 A=94:B=98:R=72:P=1.70 

40 DIM S(7) 

50 CIRCLE (8,8) ,8,1: CIRCLE ( 7 , 7 ) , 8 

,1 

60 DRAW"BM4,6R2BR2R2BDL2BL2L2BD4 

BRR4 " 

70 GET(0,0)-(16,16) ,S,G 

80 PCLS:SCREEN1,1 

90 FOR Q=6 TO 4 STEP-2 

100 FORZ=1TO2000 STEPQ:C=Z 

110 C=90-C*P/180 

120 K=C*R/90 

130 X=INT(A+R*COS(C) ) : Y=INT(B+R* 

SIN(K) ) 

140 PUT(X+36,Y+10)-(X+52,Y+26) ,S 

,PSET 

150 X=INT(A+R*SIN(C) ) :Y=INT(B+R* 

COS(K) ) 

160 PUT(X,Y)-(X+16,Y+15) ,S, PSET 

170 NEXT Z,Q:FOR M=l TO 4000 : NEX 
T:PCLS:GOTO90 *» 
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Uncompromisin g per formance at an incredible price. 

The Tandy 
Color Computer 3 

More colors, superb graphics, 
greater power for only $ 219 5 




Our most powerful 
Color Computer 

Finally, the ideal computer for 
your family: our most advanced 
Color Computer ever. The Color 
Computer 3 is great for small 
business and home applications. 
You get the advantages of a high- 
priced computer — without the 
high price! 

A rainbow at your 
fingertips 

The Color Computer 3 fea- 
tures 12SK memory (expandable 
to 512K), giving you greater 
programming power. With the 
CM-8 High-Resolution Monitor 
(26-3215), you can create razor- 
sharp graphics using 64 colors. 



The Color Computer 3's Ex- 
tended BASIC features 21 new 
commands that allow you to al- 
ternate screens, colors, and 
backgrounds — all at a higher 
resolution and with a greater va- 
riety of colors than any previous 
Color Computer. 

Compatible and 
expandable 

Best of all, the new Color 
Computer 3 is compatible with 
software and accessories de- 
signed for the Color Computer 
2, including a wide selection of 
educational, personal-manage- 
ment and game programs. Ex- 
pand with a modem or printer, 
or add a disk drive to create a 



sophisticated disk system and 
open the door to a library of ad- 
vanced disk software. 

The Color Computer 3 
(26-3334) is your affordable alter- 
native. See it todav at Radio Shack. 



Send me an RSC-17B Computer Catalog. 



Mail lo: Radio Shack, Dept 87-A-716 
300 One Tandy Cenler, Fort Worth. TX 76102 



Name . 



Address _ 

Cily 

State 



Zip. 



Radio /hack 



Puce applies at Radio Shack Computer Centers and participating stores and dealers. 
Monitor and accessories sold separately. 



The Technology Store 

A DIVISION OF TANDY CORPORATION 



GAME 



Co(o3 






Saucer, Saucer, in the Sky 

By John T. Wells 







^^ aucer Defense is a space game 
written on the CoCo 3, which 
takes less than 150 Extended 
Color BASIC lines of code. The program 
uses the HSCREEN 2 mode (allowing up 
to 16 colors on a 320-by-192 screen) and 
pits flying saucers against our missile 
battery. There is an unlimited supply of 
saucer lasers and missile lasers for both 
sides so the game can go on as long as 
you desire. Each hit you take from the 
saucer costs 100 points, and hits you 
make on the saucer gain 100 points. 

Initially, there is one flying saucer. At 
1,000 points, a second saucer joins the 
first. The saucers move after (but never 
quite catch up to) the missile battery 
and can fire at all angles. However, they 
are only accurate when within a defined 
range of horizontal pixels of the missile 
battery. Initially, this range is set at 10 
for the least difficult game mode. As 
your score increases, this range is in- 
creased so that the game gets more 
difficult. When in range, the saucers are 
quite accurate. The saucers move and 
shoot automatically. The missile battery 
fires laser-like missiles and fires them 
only straight up. The missile battery is 
left-joystick controlled (use the button 

John Wells is a U.S. Navy officer 
stationed in Washington. D.C. He has 
had his Co Cos since 1 98 1 and has been 
programming since 1978. He lives with 
his wife and children in Herndon, 
Virginia. 



Table 1: Key Variables 


Variable 


Use 


Wl 


Winning points interval 


SC 


Score 


CT 


Bonus points interval 


BO 


Bonus points award 


AD 


Hit points 


AN 


Difficulty level 


DF.Dl.D2 


Frequency of saucers' 




firing 


DI 


Accuracy of saucers' 




firing 


C0-C7 


Screen objects colors 


LIS 


Missile laser sound 


L2S 


Saucer laser sound 


L3$ 


Title page sounds 


XZ,YZ 


HPRINT X and Y : 




coordinates 



to fire) and can only fire when contin- 
uously moved. That is, if stopped, no 
missiles can be fired; however, the 
saucers will continue to shoot at the 
missile battery. 

The colors of the background and the 
saucers will change at 1,000-point inter- 
vals and 300-point bonuses will be 
awarded. The game will also increase in 
difficulty at each of these intervals (by 
adding to the accuracy of the saucer 
firings). At 5,000-point intervals, the 
program will be interrupted with a little 
fanfare and you will be given the choice 
of continuing or quitting. This is to put 
a break in the action and to allow a 
sense of winning. At any time during the 
game pressing- SHlFT-@ stops the game. 
Press ENTER to resume playing. Use 
ESC-BREAK to quit. 

While you can hold the firebutton 



down for continuous firing, it is better 
to move quickly and get in position, 
then shoot and quickly retreat out of the 
saucer's firing range. Also, it may help 
to wait for the saucer(s) to fire, then 
move in, fire quickly and retreat. Since 
the saucers' firing is based on random 
numbers, doing this is simply playing 
the odds. The color changing scheme 
occasionally results in cases where the 
explosions don't get full color filling. 
The program is operating normally 
when this occurs. 

The satellites in the background play 
no part in the game itself. 

Table 1 is a list of key variables and 
their functions. Finally, note that there 
are four levels of play. The degree of 
difficulty is far greater at Level 4 than 
at Level 1 . 1 suggest Level 1 or 2 for your 
first few games. □ 



V/ ™ 


...195 800 ... 


....51 


| 280 .. . 


...129 1020.. 


...174 


470 . . 


...246 1180 .. 


....45 


650 


194 END.. 


...130 





The listing: SAUCER 

'SAUCER DEFENSE 12/07/8 6 BY JO 

HN T. WELLS, HERNDON VA VERS 1.13 

10 POKE65497,0 

20 ON BRK GOTO 810 

30 HSCREEN 2 

40 HBUFF 1,900:HBUFF 2,900:HBUFF 

3,900:HBUFF 4,900 
50 HCLS 8 

60 WI=5000:CC=0:SC=0:XS=160:CT=1 
000 : BO=300 : AD=100 

70 X=100:X1=50:Y=100:SX=150:SY=1 
41:C$="H4G3U3L4E4H4E4U2F4E4D3R4G 
3F2R3G4F3L3D2L2" 

80 L1$="T155 ; V3 1 ;04 ; 12 ; 11 ; 10 ; 9 ; 8 
; 7 ; 6 ; 5 ; 4 ; 3 ; 2 ; 1" : L2 $="T200 ; V3 1 ? 04 
; 1 ; 2 ; 3 ; 4 ; 5 ; 6 ; 7 ; 8 ; 9 ; 10 ; 11 ; 12" 
90 GOSUB830: *****DO TITLE PAGE** 
** 

95 IF AN<1 OR AN>4 THEN AN=1 

100 IF AN=1 THEN DF=20 : Dl=4 : D2=l 

6:DI=10 

110 IF AN=2 THEN DF=18 : Dl=4 : D2=l 

4:DI=12 

120 IF AN=3 THEN DF=16 : Dl=4 : D2=l 

2:DI=14 

130 IF AN=4 THEN DF=14 : Dl=4 : D2=l 

0:DI=16 

140 EX$="L255T25501V3 1 ; 7 ; 3 ; 3 ; 5 ; 1 



; 2 ; 7 ; 5 ; 5 ; 4 ; 5 ; 7 ; V25 ; 5 ; 5 ; 5 ; 7 ; 3 ; 7 ; 4 

; 5 ; 2 ; V20 ; 3 ; 5 ; 7 ; 7 ; 1 ; 1 ; 2 ; 7 ; 4 ; V15 ; 3 

; 5 ; 2 ; 1 ; 2 ; 2 ; 5 ; 5 ; V10 ; 1 ; 7 ; 4 ; 2 ; 5 ; 8 ; 1 

; 3 ; 5 ; 7 ; 3 ; 5 ; 3 ; V5 ; 4 ; 6 ; 7 ; 3 ; 7 ; 2 ; 8 » 

150 C0=0:C1=1:C2=2:C3=3:C4=4:C5= 

5:C6=6:C7=7 

160 HDRAW"C3;BM165,82;L8U3D6L1U6 

D3R16U3R1D6U6D4U1L16R16L4H4G4":H 

CIRCLE (165, 82) , 3 , 3 : HPAINT ( 166 , 83 

) ,3, 3: HPAINT (166, 81) ,3,3 

170 HCIRCLE(128,82) , 8 , C4 , .4:HPAI 

NT(128,82) ,C0,C4 

180 HGET(0,0)-(40,35) ,1 

190 HGET(150,70)-(180,105) ,2 

200 HGET(110,76)-(140,91) ,3 

210 HPAINT(128,82) , C7 , C4 : HGET (11 

0,76)-(140,91) ,4 

220 HPUT(150,70)-(180,105) ,1,PSE 

T 

230 HPUT(110,76)-(140,91) , 1,PSET 

240 HDRAWC4 ; BM0 , 190 ; E10 ; R5 ; F5 ;E 

8 ; R3 ; E5 ; R2 ; F15 ; R3 ; E10 ; R5 ; F6 ; R7 ; F 

4 ; R2 ; E18 ; Rl ; F5 ; R3 ; F6 ; E7 ; R5 ; F12 ; E 

2 ; R6 ; F3 ; E12 ;R4 ; F10 ; R10 ; E3 ; R2 ; F5 ; 

R3 ; E16 ; F6 ; R5 ; F10 ; R2 2 ; E5 ; F6 ; R12 ; E 

4 ;F3 ;R8 ;E6 ;F6 ;R20" 

250 HPAINT (15, 190) ,C6,4 

2 60 HCOLOR 1 , 8 : HPRINT ( 10 ,0) , "SCO 

RE: ": HPRINT (19,0) ,SC 

2 70 SA=18 8:SB=10' **** SATELLITES 
280 FOR CC=1 TO 25 : XX=RND (300) : Y 
Y=RND ( 60 ) + 10 : HCIRCLE ( XX , Y Y ) , RND ( 
3) , C4: HPAINT (XX, YY) ,4,C4:NEXT CC 
290 '**** MAIN LOOP **** 

300 A=0:B=0 

310 XA=X+A:XB=X1+B 

3 20 ZZ=SX-XA:A=A+(ZZ/(RND(4)+2) ) 
330 Zl=SX-XB:B=B+(Zl/(RND(4)+2) ) 
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340 DE=XA-XB:IF DE<40 THEN A=A+2 


0:GOTO160 


0:B=B-20 


670 RETURN 


350 GOSUB410 


680 '**** MISSILE BATTERY EXPLOS 


3 60 IF POOXS AND BUTT0N(2)=1 TH 


ION **** 


EN GOSUB520 


690 HCIRCLE (SX+15, YP) ,10, C6:HPAI 


370 HPUT(X+A,Y)-(X+A+35,Y+15) ,1, 


NT (SX+15, YP+2 ) ,C3,C6: PLAY EX$ 


PSET 


700 SC=SC-AD 


380 HPUT(X1+B,Y)-(X1+B+35,Y+15) , 


7 10 HCOLOR8 , 1 : HPRINT (19,0), SC+AD 


1,PSET 


: HCOLOR1 , 8 : HPRINT ( 10 , ) , "SCORE : 


390 GOTO310 


": HPRINT (19,0) ,SC 


400 <**** SAUCER FLYING **** 


7 20 RETURN 


410 HPUT(X+A,Y)-(X+A+30,Y+15) ,3, 


730 i**** FIRST SAUCER SHOOT *** 


PSET 


* 


420 IF SO=CT THEN HPUT (Xl+B, Y) - 


740 REM PLAY L2$:'**** DELETE R 


(X1+B+30,Y+15) ,4, PSET 


EM FOR SAUCER FIRING SOUND **** 


430 RN=RND(DF) : IF RN<D1 THEN GOS 


750 XP=SX+15:YP=SY+10:DP=X+A+18- 


UB740 ELSE IF RN>D2 AND SOCT TH 


XP:IF ABS(DP)>DI THEN XP=SX+30:' 


EN GOSUB 1080 


IF DISTANCE TOO GREAT THEN SAUCE 


440 i**** OUR MISSILE BATTERY ** 


R'S SHOT MISSES 


** 


760 HLINE (X+A+18, Y+9 )- (XP, YP) , PS 


450 PO=XS:QQ=JOYSTK(0) :J0=JOYSTK 


ET: Pl=HPOINT (XP, YP+1) 


(2) :J1=J0YSTK(3) : IF J0>53THENXS= 


770 HCOLORl,8 


SX+14ELSEIFJ0<12THENXS=SX-14 


780 HLINE (X+A+18, Y+9) -(XP,YP) , PR 


460 IF XS<45THENXS=45ELSEIFXS>24 


ESET 


0THENXS=240 


790 IF Pl=3 THEN GOSUB690 : GOTO80 


470 HPUT(SX,SY)-(SX+30,SY+25) ,1, 





PSET 


800 RETURN 


480 SX=XS 


810 PALETTE CMP: WIDTH32 : POKE6549 


490 HPUT(SX,SY)-(SX+30,SY+25) ,2, 


6,0: END 


PSET 


820 •**** TITLE PAGE **** 


500 RETURN 


830 HCOLOR5,8:GOSUB910 


510 <**** SHOOT MISSILE **** 


840 LINE INPUT AN$ 


520 YY=SY-35 


850 HCOLOR8,8:GOSUB910 


530 PLAY Ll$: HLINE (SX+15, YY+40)- 


8 60 HCOLOR5,8:GOSUB1040 


(SX+15 , YY) , PSET: PP=HPOINT (SX+15 , 


8 70 LINE INPUT AN$ : PLAY L3$:AN=V 


YY-2 ) : HC0L0R1 , 8 : HLINE (SX+15 , YY+4 


AL(AN$) 


0)- (SX+15, YY) , PRESET 


880 HCOLOR8,8:GOSUB1040 


540 IF PP=C0 OR PP=C4 THEN GOSUB 


8 90 HCOLORl,8 


570 


900 RETURN 


550 RETURN 


910 XZ=8:YZ=8 


560 ***** SAUCER EXPLOSION **** 


920 L3 $="L25501V3 1 ; 12 ; 11 ; 10 ; 9 ; 8 ; 


570 D$="C2;BM"+STR$(INT(SX+15) )+ 


7" 


","+STR$(INT(YY+5) ) 


930 PLAY L3$:PLAY L3$:PLAY L3$ 


580 HDRAW D$+C$ rHPAINT (SX+15 , YY) 


940 HPRINT (XZ, YZ) ,"S A U C E R 


,C1,2 


DEFENSE" 


590 FOR I=1TO10:NEXTI 


950 FOR TT=1 TO 200 : NEXT TT 


600 HPAINT (SX+15, YY+5) ,C3,2 


960 PLAY L3$:PLAY L3$ 


610 HDRAW D$+C$ 


970 HPRINT (XZ + 7, YZ+2 ), "BY" 


620 PLAY EX$ 


980 FOR TT=1 TO 200: NEXT TT 


630 HPUT(SX-5,YY-15)-(SX+35,YY+1 


990 PLAY L3$:PLAY L3$:PLAY L3$:P 


5) ,1,PSET 


LAY L3$ 


640 SC=SC+AD 


1000 HPRINT (XZ, YZ+4) , "J H N T 


650 HCOLOR8, 1: HPRINT ( 19, 0) ,SC-AD 


. WELLS" 


: HCOLOR1 , 8 : HPRINT ( 10 , ) , "SCORE : 


1010 PLAY L3$:PLAY L3$:PLAY L3$ 


":HPRINT(19,0) ,SC 


1020 HPRINT (XZ, YZ+6) , "PRESS <ENT 


660 WW=SC/WI:IF WW>0 AND INT (WW) 


ER> TO START ! " 


=WW THEN 1220 ELSE CC=SC/CT:IF C 


1030 RETURN 


C>0 AND INT(CC)=CC THEN GOSUB115 


1040 HPRINT (XZ-5,YZ) /'DIFFICULTY 
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? 1 (EASIEST) - 4 (HARDEST) ":HPRIN 

T(XZ-5,YZ+2) , "PRESS YOUR CHOICE 

AND <ENTER>" 

1J35/3 PLAY L3$:PLAY L3$:PLAY L3$ 

Ij36j3 RETURN 

lj37^ ■ **** SECOND SAUCER SHOOT * 

*** 

1)38)9 REM PLAY L2$:'**** DELETE R 

EM FOR SAUCER FIRING SOUND **** 

1090 XP=SX+15:YP=SY+lj3:DP=Xl+B+l 

8-XPHF ABS(DP)>DI THEN XP=SX+3j3 

11J80 HLINE(Xl+B+18,Y+9) -(XP,YP) , 

PSET : Pl=HPOINT ( XP , YP+1 ) 

1110 HCOLORl,8 

1120 HLINE(Xl+B+18,Y+9)-(XP,YP) , 

PRESET 

1130 IF Pl=3 THEN GOSUB690 

1140 RETURN 

1150 i**** BONUS AND CHANGE COLO 

RS **** 

1160 HPRINT(XZ+2,YZ+2) ,BO:HPRINT 

(XZ+8,YZ+2) /'POINTS BONUS! ":SC=S 

C+BO 

1170 FOR SS=1 TO 10: PLAY L1$:PLA 

Y L3$:NEXT SS 

1180 IF AN=1 THEN DI=DI+ . 5 ELSE 

IF AN=2 THEN DI=DI+1 ELSE IF AN= 

3 THEN DI=DI+1.5 ELSE DI=DI+2 

1190 HCLS8 

1200 C0=RND ( 7 ) : C1=RND ( 7 ) : C2=RND ( 

7) :C3=RND(7) :C4=RND(7) :C5=RND(7) 

: C6=RND ( 7 ) : C7=RND ( 7 ) 

1210 RETURN 

1220 •**** QUIT OR CONTINUE **** 

12 30 HCLS4:HCOLOR 8 , 8 : FOR CO=YZ- 

8 TO YZ+2-.FOR CR=XZ-6 TO XZ+24 S 

TEP 6:HPRINT(CR,CO) ,SC:PLAY L3$: 

NEXT CR,CO 

1240 GOSUB 1280 

12 50 LINE INPUT AN$ 

12 60 HCOLOR8,8:GOSUB 12 80 

1270 IF AN$="C" THEN SC=SC+BO:HC 

LS8:GOTO160 ELSE 810 

1280 HPRINT(XZ,YZ+4) ,SC:HPRINT(X 



Z+8,YZ+4) 



POINTS !!!!!" 



1290 PLAY L3$:PLAY L3$:PLAY L3$ 
1300 HPRINT(XZ,YZ+7) , "CONTINUE < 
C> OR QUIT <Q> ?":HPRINT(XZ,YZ+9 
), "PRESS <C> OR <Q> AND <ENTER>" 
1310 RETURN /Rx 



See You at 

RAINBOWfest — Chicago 

April 10-12 
Meet CoCo Cat in person. 




Now Create Your Own Signs, 
Banners, and Greeting Cards. 



Introducing The 
Coco Graphics Designer 

Last ChrUtmu wi introduced our 
COCO Greeting Card Designer program 
(lee review April 86 Rainbow). It haj 
been so popular that we've now 
expanded it into a new program called 
the COCO Graphici Deeigner. The 
Coco Graphici Deeigner producee 
greeting cardi plua banneri and eigne. 
Thii program will further increaee the 
usefullness and enjoyment of your dot 
matrix printer. 

The Coco Graphics 

Designer allowe you to mix text and 
pictures in all your creation!. The 
program feature* picture, border, and 
character font editors, so that you can 
modify or expand the already built In 
libraries. Plus a special "grabber" utility 
is included to capture areas of high 
resolution screens for your picture 
library. 



Requirements: a Coco or Coco I! 
with a minimum of S2K, One Disk Drive 
(Disk Ext. BASIC 1.0/1. l.ADOS, or 
JDOS). Printers supported include: 
Epson RX/FX, GEMINI 10X, SG-10, 
NX-10, C-Itoh 8610, DMP-100/ 130/ 
400/ «30, Seikosha GP-IOO/250, Legend 
808 and Gorilla Bannana. Send a SASE 
for complete list of compatible printers. 
#CSS2 Coco Graphics Designer I20.Q& 



Over 100 More Pictures 

An optional supplementary library 
diskette containing over one hundred 
additional pictures is available. 
#C33S Picture Disk #1 114.05. 



Colored Paper Packs 

Now available are packs containing 120 
sheets of tractor-feed paper and 42 
matching envelopes in assorted bright 
RED, GREEN, and BLUE. Perfect for 
making your productions unforgettable. 
#C274 Paper Pack J19 06 






With Zebra's Coco Graphics Designer It's easy and enjoyable 
making your own greeting cards, signs, and banners. 



WICO 

TRACKBALL 

Now $19.95 

Order Cat#TBRS01 

(Was $69.95) 

You can benefit from our purchase of 
brand new WICO Trackball Controllers 
at closeout prices. This model was 
designed specifically for the Radio Shack 
Color Computer and plugs right into the 
joystick port. 

WICO ie the largest designer and 
manufacturer of control devices for 
commercial arcade video games. If 
you've ever played an arcade video 
game, chances are you've ueed a WICO 
joystick or trackball and experienced its 



superior control, pinpoint firing 
accuracy, and exceptional durability. 

Includes one-year limited warranty. 
Phoenolic ball offers 360-degr«-e 
movement. Two optical encoders 

provide split-second response. 

Quick-action fire button for smooth, two 
handed arcade response and feel. Long 
6' computer connection. Heavy duty 
plastic caee for long hard use. 
Compatible with all color computer 
models. 



We have bargain priced trackballs for ATARI, Commodore, TI, 
and other computers. Call or write for our price list. 



Ordering Instructions: All orden 

add 13.00 Shipping & Handling. UPS 
COD add $3.00. VISA/MC Accepted. 
NY residents add sales tax. 



Zebra Sylems, Inc 

78-06 Jamaica Ave. 

Woodhaven, NY 11421 

(718) 296-2385 
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ORGANIZATION 




By Richard 
Steinbrueck 



The 

Tournament 

Master 



You've got a bunch of people who 
want to get together for fun and 
fellowship at a sports tourna- 
ment, and you want every team to get 
a chance to play every other team. A 
"round robin" tournament is the way to 
do it, and Rnd Robin will print out the 
necessary information to get you raves 
as the tournament director. I know it 
works, because I used it to run an 11- 
team volleyball tournament last year for 
our church youth association. 

RNDRDBIN is a BASIC program that 
prints, on an 80-column printer, dot 
matrix or daisy wheel, the various 
assignments for a round robin tourna- 
ment so that every team/ person plays 
every other team/ person once. It can 
handle from five to 12 teams and also 
assigns "half-courts" and starting/ 
ending times to each round. There are 
as many rounds as there are teams. Each 
round has a place to write the results of 
three individual games, so that a two 
out of three competition can be used. 

Rnd Robin also prints out a Win/ 
Loss Summary Sheet to allow the tour- 
nament director to keep track of the 
record of each team each round. 

The program assumes there are 
enough nets and courts, fields, dia- 



Richard Steinbrueck holds a muster's 
degree in education and is a former high 
school wrestling coach. Currently he is 
a Lutheran youth minister in Valrico. 
Florida. In addition to writing pro- 
grams for the Co Co, Richard enjoys 
raising rabbits. 



monds, etc., to allow all teams to play 
at once, or in the case of an odd number 
of teams, for all but one team to play 
each round. As an example, for nine 
teams, you need four courts (see Figure 
I). When there is an odd number of 
teams, one team sits out each round. If 
there is an even number, then two teams 
rest on the second, fourth, sixth, etc., 
round. 



Half-Court 1 
Team A 

Half-Court 3 
Team B 

Half-Court 5 
Team C 

Half-Court 7 
Team D 
Team E 



Half-Court 2 
Team I 

Half-Court 4 
Team H 

Half-Court 6 
Team G 

Half-Court 8 
Team F 

(Rest Period) 



Figure 1: Nine-Team Court Setup 



RndRobin is set up so you can run 
it right out of the box to see how it 
works and get an idea of how 12 teams 
would play. Examine lines 21 to 27 and 
figure out what has to be changed. Then 
modify lines 21 to 27 with your own 
specific numbers and names. You might 
start by changing only the value for the 
number of teams in Line 22 to how 
many your tournament will have and 
printing the results. When you put in 
your own team names, put the second 
team as the first name in the DflTfl 
statement and then the rest of the list, 
then put the first team last. 
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Those variables that can easily be 
changed are as follows (by line number): 

2 1 -names of the competitors, listed as 

DATA 
22-the number of competitors/ teams 
23-lhe title (name) of the tournament 
24-the date of the tournament 
25-the starting time of the first round 
26-the length of time for each round 
27-the length of the break (rest period) 

between rounds 

You can also change lines 120 to 140 
for your printer's commands to allow 
double-wide, double-height printing. In 
the program now, they are only remark 
lines with my Citizen I20D codes. But 
before removing those apostrophies, 
read your printer manual. The program 
will work fine with most 80-column 
printers just as is, and putting in wrong 
codes could give some unpredictable 
results. 

A second way to enter your own 
information is to replace lines 20 to 29 
with INPUT. INPUT replaces those lines 
with a series of INPUT statements that 
you answer each time you run the 
program. If you like to make changes, 
reentering the information can be quite 



tiresome and time consuming. That's 
why I like to have the variables as part 
of the program. 1 save the program with 
the variables so 1 can easily try out 
variations by changing only one aspect 
each time 1 run it (such as the length of 
each match). 

Lines 542 to 578 are the subroutine 
for printing the competition assignment 
sheets. The format of the sheets can be 
changed by modifying these lines. In 
particular, if a two out of three scries of 
games is not used, lines 560 to 569 could 
be deleted and Line 557 could be 
changed to PRINT tt-2, "SCORE: A" A" to 
XX". 

Since every printer has its differences, 
the program allows you to stop after 
printing the set of competitions for each 
round. This permits adjusting the paper 
so you can get each round to start at the 
top of a sheet. I used legal size paper (8 
Yi inches by 13 inches) to print out each 
round using double-height, double- 
wide print for my 1 1 -team tournament. 

Rnd Robin is a printing program, not 
a record keeping program. I leave to 
another rainbow reader the challenge 
of writing a program that allows scores 
to be entered and then prints out the 
final results. In mv own tournament I 



was out in the field, so using my CoCo 
was not advisable and records were kept 
by hand. 

The program is extensively remarked 
to allow customizing to fit your needs. 
In addition I have numbered it so that 
major routines begin at the 100s, mak- 
ing it easier to find them. Generally, I 
expect this program to be modified 
extensively as the user customizes it. 
However, 1 do not recommend chang- 
ing margin statements or formulas 
without careful study, since they affect 
the program in many different places. 

After writing RndRobin and prepar- 
ing it for publication, I remembered a 
gimmick used by a tournament director 
to add to the excitement of a round 
robin tournament; he rearranged the 
remaining rounds after the first few 
rounds had been played so that the 
probable better teams would be playing 
the last round. It adds a lot to have the 
deciding match for first and second 
place played during the last round. 

I would like to hear about your use 
of RndRobin and will try to answer any 
questions. You can reach me at Imman- 
uel Lutheran Church in Brandon, Flor- 
ida at (813) 681-1526. Have a happy 
tournament! D 



y^ 



566 .. . 


...149 


25 ... 


...161 




770 ... 


....64 


130 .. 


...124 




1010 .. 


...202 


305 .. 


...244 




1200 . . 


3 


400 .. 


...133 




END . 


132 


527 


129 









Listing 1: RNDROBIN 

1)2 'title screen (1-5-87 9 AM) 

11 CLS : PRINT@lj36 , "RNDROBIN . BAS" 

12 PRINT: PRINT/TAB (4) "BY RICHARD 
STEINBRUECK" 

"lip 9 LAKEMONT DRI 



13 PRINTTAB(6 
VE" 

PRINTTAB ( 6 



14 
4" 
15 
16 



"VALRICO, FL 3 359 



PRINTTAB(8) "813/681-1526" 
PRINT : PRINTTAB ( 7 ) " COPYRIGHT 1 

987": PRINTTAB (5) "ALL RIGHTS RESE 

RVED" 

17 FORX=lTO10JJj3 : NEXT: CLS 

18 CLEAR2J300 

19 ' 

2J3 'listing of competing teams ( 
max length of each name is 19 ch 
ar.) NOTE: starting with the se 
cond team, list all the teams in 
order and then place the first 



team's name last. 

21 DATA TEAM B,TEAM C,TEAM D,TEA 
M E,TEAM F,TEAM G,TEAM H,TEAM I, 
TEAM J, TEAM K,TEAM L,TEAM A 

22 T=12 'number of teams (range f 
rom 5 to 12) 

23 TP$="1987 ROUND-ROBIN VOLLEYB 
ALL TOURNAMENT" 'title phrase pri 
nted at top of sheets (cannot be 

over 4,0 characters long) 

24 DT$="May 22, 1987" "date 

2 5 H=2 :M=00' starting time of tou 
rnament 

26 L=15 ' length of each round in 
minutes 

27 B=5 ' length of break between m 
atches in minutes 

29 DIMTS$(T) ,T$(T) ,A$(T) ,N$(T) 'T 
rounds of competition with t te 

ams 

30 'miscellaneous calculations & 
eguations 

4p LM=p:RM=4p 'margins set for do 

uble-wide printing 

5j3 TP=INT( (4£-LEN(TP$) )/2) : DT=IN 

T( (40-LEN(DT$) )/2) 

60 NT=1 

70 GOTOlppp 

80 ' 

100 'Citizen 120D printer codes 
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WE'RE BRINGING THE COCO 



RAINBOW'S 
BROADENING ITS 
SPECTRUM 

the rainbow and the Delphi Infor- 
mation Utility have joined together 
to allow CoCo owners all over the 
world to connect with one another! 

Delphi is a full-service information 
utility. It offers everything from up- 
to-the-minute news stories from The 
Associated Press to electronic mail 
services. But, best of all, it now has 
a special forum for Color Computer 
owners, and it's operated by the 
people who bring you the rainbow 
each month. 

The CoCo Special Interest Group 
(SIG) features a variety of services, 
including an open forum where you 
can send and receive messages 
from Color Computer owners all 
over the world. It also has several 
databases to which you can upload 
your favorite programs and from 
which you can download programs 
written by other CoCo enthusiasts. 
Some of these databases are basic 
programming, OS-9 and home ap- 
plications. 

When setting up your account with 
Delphi, if you do not have a credit 
card or prefer not to use it, Delphi 
requires that you send $20 to give 
your account a positive balance. This 
will be refunded after your first free 
hour if you choose to no longer use 
the system or it will be applied to 
future connect charges. If you do not 
maintain a positive balance, you will 
be charged $3.50 each month for 
direct billing. 



PEEK INTO THE 
RAINBOW 

The CoCo SIG's conference feature 
allows you to meet electronically 
with other members of the CoCo 
Community. You can join conferen- 
ces with notables such as Dale 
Puckett, Cray Augsburg, Marty 
Goodman, Don Hutchison, Jim 
Reed, Lonnie Falk and others — 
on a regular basis. Conference 
schedules will appear in the rain- 
bow each month. Be sure to check 
online announcements for changes 
and additions. 



THE OTHER SIDE 
OF THE RAINBOW 

On Delphi, you also are able to buy 

rainbow on tape — order a whole 
set, or download an individual pro- 
gram immediately. You can also 
renew your rainbow subscription, 
make a fast and easy order for soft- 
ware or hardware from a multitude 
of vendors, or inquire about prod- 
ucts on the CoCo SIG. 

We also have a number of programs 
that you can download and use, just 
for the cost of the time you spend 
transferring them. There'll also be 
corrections for rainbow articles, 
helpful hints and many other useful 
features. 



FREE LIFETIME 
MEMBERSHIP 

the rainbow is offering subscribers 
a free lifetime subscription to Delphi 

— a $24.95 value — and a free hour 
of connect time — a $7.20 value at 
either 300, 1200 or 2400 Baud — so 
you can sample Delphi and the rain- 
bow CoCo SIG. That's right. Your 
subscription to the rainbow entitles 
you to this $32.15 value as a free 
bonus! 

If you're not a rainbow subscriber, 

just enter your order when you sign 
on with Delphi and you'll get the 
same great deal! For our $31 sub- 
scription fee, you'll get the finest 
Color Computer magazine ever, a 
free lifetime subscription to Delphi 
and a free hour of connect time. 

SAVE EVEN MORE 

Want to save even more? While 
you're online you can order, for only 
$29.95, a deluxe package which in- 
cludes the Delphi membership, the 
Delphi Handbook and Command 
Card ($21 .95) and a total of three 
hours of connect time ($21 .60). 

Delphi provides us all with Imme- 
diate CoCo Community. Check it 
out today. After all, you can sample 
it for free! 



Problems? Call Delphi: 
(800) 544-4005 
(617)491-3393 



DELPHI 



TYPE: 

GROUP COCO 






COMMUNITY TOGETHER 



How to reach RAINBOW'S Color Computer SIG . . . 



There are several ways to connect to Delphi and the 
rainbow's CoCo SIG. In most cities you will not even have 
to pay long distance charges; you can use special data 
communications networks like Telenet, Tymnet and the 
Canadian Datapac network. 

First, set your terminal program to operate at either 300 
or 1200 Baud (depending on the modem you have), and 
also select either 7 bits with even parity or 8 bits with no 
parity, and one stop bit. (If one combination doesn't work, 
try another.) 

Decide which network you should use. There is no 
surcharge for Telenet or Tymnet. Canadian residents using 
Datapac will be charged an additional $12 (U.S.) per hour. 

On Telenet: The Uninet network has now merged with 
Telenet. To get the Telenet number for your area, call (800) 
336-0437. After you call your local access number and 
make connection, press the ENTER key twice. When the 
"TERMINAL=" prompt appears, press ENTER again. 
When the "@" prompt appears, type C DELPHI and press 
ENTER. 

On Tymnet: Call (800) 336-0149 to get the Tymnet 
number for your area. After you dial your designated 
number and connect, you will see either "garbage" or a 
message saying "please type your terminal identifier." At 
this point, even if the screen is garbled, simply press 'A'. 
When "please log in:" appears, type DELPHI and press 

ENTER. 

From Canada (on Datapac): Call Delphi Customer 
Service at (617) 491-3393 to get the Datapac number for 
your area. After you connect, press the period key (.) and 
ENTER (use two periods if you're using 1200 Baud). Type 
5ET 2:1, 3:12E and press ENTER. Now type p 1 3106, 
DELPHI ; and press enter. Delphi's new rates indicate an 
additional $12 hourly surcharge for evening use of 
Datapac, which means a total of $18 (U.S.) for connect 
time. 

From other countries: Many countries have their own 
data networks that can connect to either Telenet or 
Tymnet. Check with the telephone authorities in your 
country for details on how to sign up for this service. When 
you have an account set up, you can reach Delphi with 
a "host code" of 312561703088 through Telenet, or 
310600601500 through Tymnet. (You'll have to pay the toll 
charges for this connection.) 
Type in Your Username 

If you're already a subscriber to THE rainbow, at the 
"USERNAME:" prompt, type RRINBOWSUB and press 



enter. At the "PASSWORD:" prompt, type your individ- 
ual subscription number from the mailing label of your 
latest issue of THE RAINBOW. (If there are one or more zeros 
at the beginning of this number, include them.) 

If you don't already have a subscription, at the "USER- 
NAME:" prompt, type RRINB0W0RDER and press ENTER. 
At the "PASSWORD:" prompt, type 5ENDSUB and press 
enter. Have your MasterCard, VISA or American 
Express card ready, because you'll be led through a series 
of questions that will enable us to put your RAINBOW and 
Delphi subscriptions into effect. In an effort to hold down 
non-editorial costs, we do not bill for subscriptions. 

If you make a typing error, just press ENTER and start 
over. Remember that at any point, when you're on Delphi, 
you can type HELP to get help on how to use the system. 
To get off the system just type BYE. 

If you find that you're unable to log on to Delphi and 
enter the CoCo SIG after following these instructions, call 
us during afternoon business hours at (502) 228-4492. We'll 
be glad to offer assistance. 

Come Visit Us! Type: GROUP COCO 

After you sign in, you'll be prompted to set up your own, 
personal "user name" — Delphi is a friendly service, no 
numbers to remember — and you'll be asked a number 
of questions so Delphi can set up your account. You'll also 
be assigned a temporary password. No time is assessed 
against your free hour of service while you answer these 
questions. 

Delphi will tell you that your account will be ready after 
6 p.m. the same day if you sign up before noon (Eastern 
time zone.) If not, your account will be ready at 6 p.m. 
the next day. Once an account is opened, each rainbow 
subscriber will be credited with an hour of free time! 



When you log back in, use your chosen username and 
your temporary password to access the system. At that 
point, you will meet Max, who will help you configure 
things and will change your temporary password into 
your own personal password. This is the password you 
will use for subsequent sessions — or until you change it. 



After Max bids you goodbye, you'll wind up at the 
Delphi Main Menu; type in GROUP COCO and join us on 
the CoCo SIG! 



(lines 100-140) 


A$(X)=N$(NT) :NT=NT+l 


110 'printer code for competitio 


3 50 NEXT X 


n schedule printing (lines 120-1 


3 55 FOR X = 1 TO A 


30) 


360 IF DA=0 THEN READ A$(X) ELSE 


12)3 'PRINT#-2,CHR$(27) ;CHR$(126) 


A$(X)=N$(NT) :NT=NT+1 


;CHR$(49) ;CHR$(1) 'double height 


3 65 NEXT X 


130 'PRINT#-2,CHR$(27) ;CHR$(33) ; 


3 70 NT=1: RESTORE 


CHR$ (40) 'emphasized double wide 


375 • 


pica (40 columns) 


400 'printing of competition sch 


13 5 RETURN 


edule by round 


137 'printer code for win/loss s 


405 GOSUB 120 'printer codes 


ummary sheet printing (line 140) 


415 GOSUB 506 'heading subroutine 


140 'PRINT#-2,CHR$(27) ;CHR$(33) ; 


420 FOR X= TO G-l 


CHR$(8)'pica (80 column) ; emphasi 


425 B$=A$(X+1) :C$=A$(U-X) 


zed 


430 GOSUB 545 


150 RETURN 


435 NEXT X 


160 ' 


440 PRINT#-2 


200 'Hour & Minute Subroutine 


445 IFPP=1THEN CLS : PRINT@160 , "PR 


205 IF M > 59 THEN M = M-60:H=H+ 


OGRAM PAUSING. <ENTER> TO CO 


1 


NTINUE PRINTING" ; : INPUTQ$ 


210 IF H > 12 THEN H = H-12 


450 NEXT A 


215 RETURN 


455 PRINT#-2 


220 'start & end time of round 


460 PRINT#-2 


225 FOR X = 1 TO T 


4 65 GOTO1000 


230 M$=STR$(M) : IF M<10 THEN M$=" 


470 ' 


0"+RIGHT$ (STR$ (M) , 1) 


500 'schedule sheet heading prin 


235 TS$(X)=STR$(H)+":"+M$ 


t subroutine 


240 M=M+L' length of each round i 


503 ' 


n L minutes 


506 CLS: PRINT "PRINTING SHEET HEA 


245 GOSUB 205 


DING" 


250 M$=STR$(M) : IF M<10 THEN M$=" 


509 PRINT#-2,TAB(TP)TP$ 


0"+RIGHT$(STR$(M) ,1) 


510 TM$="ROUND #"+STR$(A)+" "+T 


255 T$(X)=STR$(H)+":"+M$ 


S$(A)+" — "+T$(A) :TM=INT( (40-LEN 


2 60 M=M+B' break between matches 


(TM$))/2) 


in B minutes 


512 PRINT#-2,TAB(TM)TM$ 


265 GOSUB 205 


515 PRINT #-2,"" 


270 NEXT X 


518 'PRINT #-2, TAB ( INT ( (LM+RM)/2 


275 ■ 


) -16) STRINGS? (32," = ") 


300 'team competition assignment 


521 PRINT#-2 , TAB ( 4 ) STRING$ ( 3 2 , "= 


S 

305 CLS: PRINTS 160," DO YOU WISH 


524 PRINT #-2,"" 


THE PRINTER TO PAUSE AFTER I 


527 IF P=1THENPRINT #-2,A$(T-G); 


T PRINTS EACH ROUNDSO YOU CAN AD 


" has a bye (Rest period) "'if an 


JUST THE PAPER TO GET ONE ROUND 


odd number of teams compete, ea 


PER SHEET <Y/N>"; : INPUTPP$ : IFPP 


ch round one has a bye (rest per 


$="Y"THENPP=1 


iod) 


307 F0RA=1 TO T 'round number 


530 IF (P=0 AND F=l) THEN PRINT 


310 G=INT(T/2)'# of matches play 


#-2,A$(T/2) ;" & ";A$(T/2+l) ;" ha 


ed at the same time 


ve byes (rest period) " :F=0 ' if an 


315 IFG<>T/2THENP=l'set P=l if o 


even number of teams compete, e 


dd number of teams 


very other round two teams have 


320 F=0:IF (A/2=INT(A/2) AND P=0 


a bye (rest period) 


) THENF=1:G=G-1 


53 3 PRINT #-2,"" 


325 IF A = T THEN 355 


53 6 RETURN 


330 U=T 


539 ' 


335 'reading and assigning team 


542 'subroutine for printing com 


names 


petition assignments 


3 40 F0RX=A+1 TO U 


545 CLS:PRINT"PRINTING ASSIGNMEN 


345 IF DA=0 THEN READ A$(X) ELSE 


TS FOR ROUND"; A 
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548 PRINT #-2, "Half-Court " ;2*X+ 

l;TAB( 25) "Half-Court ";2*X+2 

551 PRINT #-2,B$;TAB(20) "VS";TAB 

(25)C$ 

554 PRINT #-2 

557 PRINT #-2, "SCORES: Game 1 .. 



560 PRINT #-2 
563 PRINT #-2," 



566 PRINT #-2 
569 PRINT #-2," 



Game 2 



Game 3 



572 PRINT #-2 

575 PRINT #-2 

57 8 RETURN 

581 ' 

6,0,0 'Summary sheet print routine 

610 ' 

620 GOSUB 140 'printer code 

630 TM=INT((56-3*T)/2) 'compute t 

op and bottom margin 

64,0 FOR X = 1 TO TM: PRINT#-2 : NEX 

T X 

650 LM=24-2*T:RM=LM+3 2+4*T:MS=LM 

+RM 

660 TP=INT( (MS-LEN(TP$) )/2) 

670 DT=INT( (MS-LEN(DT$) )/2) 

680 WL=INT( (MS-22)/2) 

690 PRINT#-2, TAB (TP)TP$ 'from lin 

e 22 

700 PRINT#-2,TAB(DT)DT$ 

710 PRINT* -2 

720 PRINT#-2, TAB (WL) "WIN/LOSS SU 

MMARY SHEET" 

730 GOSUB850 

740 PRINT* -2, TAB (LM) "TEAM" ;TAB(L 

M+16+2*T) "ROUND #" ;TAB (LM+20+4*T 

) "TOTAL", -TAB (LM+26+4*T) "PLACE" 

750 F0RY=1T0T:PRINT#-2,TAB(4*Y+1 

6+LM)Y; :NEXTY:PRINT#-2 

7 60 GOSUB850 

770 IF DA=0 THEN FOR X=2 TO T:RE 

ADN$(X) :NEXTX:READN$(1) 

775 FOR X=l TO T 

780 GOSUB840 

790 A$=N$(NT) :NT=NT+1 

800 PRINT#-2,TAB(LM)A$; :GOSUB840 

810 GOSUB850 

820 NEXTX 

8 30 GOTO8 60 

840 FORY=0TOT:PRINT#-2,TAB(4*Y+1 

9+LM) ":"; :NEXTY:PRINT#-2,TAB(25+ 

4*T+LM) ":";TAB(31+4*T+LM) ":":RET 

URN 

850 PRINT#-2,TAB(LM)STRING$(RM-L 

M,".") : RETURN 

8 60 GOSUB850 

870 NT=1: RESTORE 



880 FORX=lTOTM:PRINT#-2: NEXTX 

885 NT=1: RESTORE 

890 ' 

1000 'main menu 

1002 CLS:PRINT§42, "RNDROBIN. BAS" 

;TAB(37)"BY RICHARD STEINBRUECK" 

;TAB(32) STRING$ (32, "*") ;TAB(45) " 

MENU" 

1010 PRINT@224," <OOMPETITION A 

SSIGNMENT SHEETS <S>CORING SUMMA 

RY SHEETS <I>NSTRUCTIONS" 

: PRINT: INPUT" WHAT IS YOUR CHOIC 

E";Q$:IFQ$="C"THEN225ELSEIFQ$="S 

"THEN600 

1100 'instructions 

1110 CO$="to continue, press <en 

ter>" 

1120 RU$=" INSTRUCTIONS ":RR$=" 

":RS$=STRING$(32,"#") :R$= 
RR$+RU$+RR$+RS$ 
1130 CLS:PRINTR$ 

1140 PRINT" RNDROBIN. BAS IS A P 
RINTING PROGRAM DESIGNED TO P 
RINT OUT COMPETITION ASSIGNMEN 
TS FOR FROM5 TO 12 PARTICIPANTS 
OR TEAMS INA ROUND ROBIN TOURNA 
MENT . " 

1150 PRINT" IN A ROUND ROBIN TR 
OURNAMENT EACH OF THE PARTICIPA 
NTS OR TEAMS COMPETES AGAINS 
T EACH OF THE OTHER PARTICIP 
ANTS OR TEAMS. 

1160 PRINT@480 , CO$ ; : INPUTQ$ : CLS : 
PRINTR$ 

1170 PRINT" THE WINNER IS DETER 
MINED BY THE BEST WIN/LOSS REC 
ORD. IN THEEVENT OF A TIE, THE T 
EAM WHO WONTHE HEAD-TO-HEAD MATC 
H IS THE WINNER OF THE TIE. 
1180 PRINT" IF RNDROBIN. BAS IS 
RUN AS IS, IT WILL PRINT OUT A T 
OURNAMENT FOR 12 TEAMS. MODIFI 

Y IT FOR YOUR TOURNAMENT BY ED 
ITING LINES21-28 AND REPLACING M 

Y VALUES WITH YOUR OWN." 

1190 PRINT§480,CO$; : INPUTQ$ : CLS : 
PRINTR$ 

1200 PRINT" YOU WILL NEED TO KN 
OW THE NAMES OF THE COMPETIT 
ORS, THE TIME OF THE FIRST MAT 
CH, THE LENGTH OF THE MATCHES 
AND THE LENGTH OF THE BREAK B 
ETWEEN EACHMATCH." 

1210 PRINT" ALSO PUT IN THE NAM 
E AND DATE OF YOUR TOURNAMENT. R 
NDROBIN. BASIS DESIGNED TO PRINT 
ON AN 80 COLUMN PRINTER, EITHE 
R DAISY WHEEL OR DOT MATRIX." 
1220 PRINT@4 80 , CO$ ; : INPUTQ$ : CLS : 
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PRINTR$ 

12 30 PRINT" RNDROBIN.BAS USES R 
EM STATE- MENTS EXTENSIVELY TO 
IN YOUR MODIFICATIONS 
LINE NUMBERS ARE ARRA 
THAT MAJOR ROUTINES B 
10/3, 200, 300, ETC." 
IF YOU HAVE ANY QUE 



ADDRESSED, STAMPED EN 



ENJOY YOUR T 



HELP YOU 
. ALSO, 
NGED SO 
EGIN AT 
1240 PRINT" 



STIONS, FEEL FREE TO CONTACT 
ME. IF YOUWRITE, PLEASE INCLUDE 



A SELF- 
VELOPE." 

1250 PRINT: PRINT" 
OURNAMENT ! " 

12 60 PRINT@480,CO$;:INPUTQ$:CLS 
1270 GOTO1000 

1280 'RNDROBIN.BAS, COPYRIGHT 19 
87 BY RICHARD STEINBRUECK, 1109 
LAKEMONT DRIVE, VALRICO, FL 33 5 
94, 813/681-1526 



Listing 2: INPUT 



20 ' INPUT. BAS COPYRIGHT 1987 BY 
RICHARD STEINBRUECK, ALL RIGHTS 
RESERVED this routine is to be s 
ubstitued for lines 21-29 in RND 
ROBIN . BAS 

21 DA=1:YN$="IS THIS CORRECT <Y/ 
N>":CLS: INPUT "HOW MANY TEAMS IN 
THE TOURNAMENT ( 5-12 ) ";T: IF (T<5 O 
R T>12)THENCLS:GOT021 

22 DIMN$(T) ,TS$(T) ,T$(T) ,A$(T) :C 
LS: PRINT "ENTER YOUR SECOND TEAM, 

CONTINUE WITH YOUR LIST, ENTERI 
NG THE FIRST TEAM LAST .": PRINT : 
PRINT "MAX LENGTH OF NAME IS 19 C 
HAR":FORX=lTOT:PRINT"NAME OF TEA 
M";X; :INPUTN$(X) : NEXTX :PRINTYN$; 
: INPUTQ$ : IFQ$="N"THEN22 
2 3 CLS: PRINT "WHAT IS THE NAME OF 

YOUR TOURNA-MENT (MAX. 40 CHARA 
CTERS) " : INPUTTP$ : PRINTYN$ ; : INPUT 
Q$:IFQ$="N"THEN23ELSEIFLEN(TP$)> 
40THENPRINT"TOO LONG-TRY AGAIN": 
FORX=1TO1000 : NEXTX : GOT02 3 
24 CLS:PRINT"WHAT IS THE DATE OF 

THE TOURNA- MENT (IE. MAY 10, 1 



987) ":INPUTD$,Y$:PRINTYN$; : INPUT 
Q$ : IFQ$="N"THEN24ELSEDT$=D$+" , " 
+Y$ 

25 CLS:INPUT"WHAT TIME DOES THE 
TOURNAMENT START (HH,MM) NOTE 
COMMA BETWEENHOUR AND MINUTES ";H 
,M: PRINTYN$ ; : INPUTQ$ : IFQ$="N"THE 
N25ELSEIF(H<1 OR H>12 OR M<0 OR 
M>59)THEN PRINT"TRY AGAIN" : FORX= 
1TO1000 : NEXTX : GOT02 5 
2 6 CLS : INPUT "HOW MANY MINUTES LO 
NG IS EACH ROUND" ;L:INPUT"HOW 
LONG IS EACH BREAK BETWEEN EACH 
ROUND" ; B : PRINTYN$ ; : INPUTQ$ : IFQ$ 
="N"THEN26 

27 CLS:PRINT"this is the informa 
tion you haveentered" : PRINT"THER 
E ARE ";T; "TEAMS IN ";TP$;" ON "; 
DT$;" STARTING AT " ;M; "MINUTES A 
FTER";H;". EACH ROUND IS";L;"MI 
NUTES LONG WITH A" ;B; "MINUTE BRE 
AK BETWEEN EACH ROUND. ": PRINTYN$ 
: INPUTQ$ : IFQ$="N"THEN2 1 

28 PRINT "THE TEAMS ARE : " : FOR X=l 
TO T:PRINTN$(X) :NEXT X:PRINTYN$ 

; : INPUTQ$ : IFQ$="N"THEN21 

29 ' /R\ 



LOWEST CONTROLLER PRICE EVER!! The New JFD-EC, Only $75 

NOW COCO 3 Compatible* 



JFD-EC DISK CONTROLLER 

The JFD-EConomical controller combines the best features of the 
I original JPD-COCO with 
the two switchable ROM 
sockets, fully buffered Jala 
lines and Memory Minder 
in ROM. The JFD-EC re- 
places the JFD-COCO in 
[ our product line at an even 
lower price. The controller 
I includes JDOS. the JDOS 
I manual and Memory Mind- 
er in ROM (Precision Alignment Disk not included.) 
JFD-KCDiskConlrullcrwithJUOS $75 

J KD-KC Disk Controller with RS DOS 1.1 $75 

Optional 
Precision Alignment Disk & Memory Minder Manual $40 

Both ROM chips add an additional $20 

•JFD-EC and JFD-CP with JDOS or RS DOS are COCO 3 compatible. 




NEW TERMS 

One-year warranty on parts & labor; 30-day 
money back guarantee (except shipping) if not 
totally satisfied. Items must be returned in like new 
condition. 

Kree shipping via UPS in continental United Stales 
(in payment by VISA, MasterCard, or cashiers 
check. COD requires 10H prepayment by bank card 
plus 3% shipping. Blue I -ahel and foreign shipping 
extra. 

<//A 

JAM SYSTEMS, LTD. 

15100-A CENTRAL SE 

ALBUQUERQUE, NEW MEXICO 87123 

505/592-4182 



JFD-CP DISK CONTROLLER 

Our new JFD-CP. compatible with the original COCO, COCO 2 and 

the new COCO 3, features 
a parallel port to support a 
Centronics compatible 
printer or our hard drive, 
and an external ROM 
switch, which allows you to 
select JDOS or an optional 
RS DOS-type ROM. It 
comes in a case and in- 
cludes JDOS 1 .2 and man- 
ual. JDOS Implements all RS DOS commands, plus many more, in- 
cluding auto line numbering, error trapping, baud rate selection. 
OS/9 boot from floppy or hard drive, and Memory Minder, our disk 
drive analysis program. (Precision Alignment Disk not included.) 

JFD-CPDiskControllerwithJDOS $139 

JFD-CP Disk Controller with RS DOS 1.1 $ 139 




DRIVE SYSTEMS 

Upgrade your Color Computer by adding our JFD-CP disk controller, JDOS with Memory Minder in ROM and one or two half-height floppy drivels) with case and power supply. 
Drive O System with one double sided drive $279 Drive 0, 1 System with two double sided drives $399 
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DANGEROUS BOOK At what 
point does knowledge become too 
dangerous to print? This is a ques- 
tion posed by many over the grow- 
ing popularity of The Hacker's 
Handbook, a book about breaking 
into computer systems. Many peo- 
ple feel that the proliferation of this 
sort of information is dangerous 
and will encourage computer crime. 
Publisher Eben Brown of E. Arthur 
Brown Company disagrees. "The 
only threat to computer security is 
ignorance," he says. The book ap- 
pears to be doing remarkably well. 
Brown says more than 60,000 have 
been sold and he's just taken deliv- 
ery on a third press run. The 
Hacker's Handbook is available at 
many bookstores. You can also 
order it directly from the publisher. 
The price is $12.95. Contact E. 
Arthur Brown Company, 3404 
Pawnee Drive, Alexandria, MN 
56308, (612) 762-8847. 



GENERIC? The BLACK BOX 
Basic Buffer will receive data 
through either a parallel or serial 
interface at a user-selectable baud 
rate (any of 16 between 50 bps and 
38.4K bps), then transmit that data 
to either an RS-232 serial or Cen- 
tronics parallel printer. This device, 
priced at $349, will accommodate 
four transmission modes and has 
serial or parallel input and output 
ports for compatible cables. Both 
input and output speed and com- 
munication control switches are 
adjacent to both ports, providing 



easy access for setting configura- 
tions. With a 256K storage capacity 
that enables the user to print up to 
256 copies of its contents, the Basic 
Buffer is flexible for most business 
needs. Contact BLACK BOX Cat- 
alog, P.O. Box 12800, Pittsburgh, 
PA 15241, (412) 746-5500. 

ONLINE SURPRISE While she 
was browsing through the Kuss- 
maul Encyclopedia, an electronic 
encyclopedia on Delphi, a few 
months ago, Elizabeth M. Ferrarini 
found something most unusual — in 
addition to information on such 
computer luminaries as Steve Jobs 
and Adams Osborne, she found an 
entry about herself! "I was 
stunned," says Ferrarini. "I was 
looking for biographies of people 
who fueled the growth of microcom- 
puting. And I came across my 
name." Although she doesn't have 
as much notoriety as either Jobs or 
Osborne, her formula for writing 
about online services has received its 
share of recognition. At Spring 
Comdex, the Computer Press Asso- 
ciation gave her book, Infomania: 
The Guide to Essential Electronic 
Services, (published by Houghton 
Mifflin Company) the Best 
Computer-Book-of- the- Year 
Award. Of course, Ferrarini is un- 
doubtedly flattered with even a one- 
line mention in the encyclopedia. 
She said, "1 have no idea why Wes 
Kussmaul, the founder of Delphi, or 
anyone else at the service would 
even put my name in the encyclope- 
dia . . . ." For more information 



about Delphi and the Kussmaul 
Encyclopedia, consult Ferrarini's 
Infomania. A whole chapter is de- 
voted to the service. In fact, Russ 
Lockwood of the Louisville Times 
said, "Few people have explored the 
curves and crossroads of the data 
highways as thoroughly as Ferra- 
rini. Along the way she checks in . . . 
at attractions such as . . . Delphi." 

COST DOWNGRADE In a move 

to further strengthen its position as 
a price/ performance leader in the 
printer marketplace, Epson Amer- 
ica Inc., has announced a price 
reduction on some of its products. 
Prices on the Epson LQ-800 and 
LQ-1000 24-pin dot matrix printers 
and the EX-800 and LS-86 nine-pin 
dot matrix printers will be reduced. 
The LQ-800 will be reduced from 
$799 to $699 and the LQ-1000 will 
be reduced from $1095 to $995. In 
the low-end dot matrix market, the 
LX-86 will be reduced from $349 to 
$299 and the EX-800 from $749 to 
$649. At press time, information 
was unavailable as to when these 
cost reductions would take place. 
For more information, contact 
Epson America Inc., 2780 Lomita 
Blvd., Torrance, CA 90505. 



Dave Haber has informed us that 
his programs Co Co Checkbook, 
Co Co Video Tiller and VIP Writer 
Enhancer are now available exclu- 
sively from Foxy Software, 1 1684 
Ventura Boulevard, Suite #388, 
Studio City, CA 91604. 
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Corrections. 



"Success Mansion" (January 1987, 
Page 108): Line 1310 of the listing for 
SUCCESS was "overpacked." Due to its 
length, when it was LLISTed to the 
printer, the buffer used internally by the 
CoCo's detokenizing routine could not 
hold all of the expanded line after 
detokenization. Thus, the final was 
omitted. 

The last basic statement in the line 
should be GDTO430, whereas it now lists 
as G0TO43. To add the final zero to the 
line, enter EDIT1310. Then press X to 
gel to the editor's "extend mode" and 
press as the last character. Press 



gfeCMT 



ENTER and save the corrected listing. 
Also, Line 10 of the program contains 
a FILES statement that will wreak 
havoc with tape systems. If you are 
using tape and encounter this problem, 
just reenter Line 10 as follows: 

10 CLEAR 1024 



"Baseball Card File" (May 1986, 
Page 66): If you try to edit a card with 
the present version of BASEBRLL, the 
card will disappear. To correct this, 
make the following changes: 



Line 650 - reverse the positions 

to N1$=NS 
Line 680 - reverse the positions 

to T1S=TS 
Line 710 - reverse the positions 

to Y1$=Y$ 
Line 740 - reverse the positions 

to C1$=C$ 

Also, change Line 770 to read: 

IF LEFTS (Q$,1)0"Y" THEN M1$=M 
$:GDTO790 



r 



PREMIUM PRINTER SYSTEMS 

PLUG-N-GO FOR THE COCO A 



STAR NX-10 



Easy-to-use and ready for heavy 
workloads. System includes the 
NX-10 printer with BLUE STREAK II 
serial to parallel interlace and our Soft- 
ware Trio (see below). 1 Year limited 
warranty serviceable nationwide. 



CITIZEN 120D 



System includes Citizen I20D printer 
with serial interface, cable, and our 
Software Trio (see below). 12 month 
limited warranty. 



^ 



^•77 



These 



SPtCS I20cps Draft, 
30 cpsNtQ. Hows. 
Sub S Superscnpts, 
EirphaMod. DouWesinko. 

Proportional International. 

dotvl<no. Forward or RovOfMr ni216* 
Line Foods. Friction 4 PuWi r radar. 
5KDataBullor 



are complete 
"*— - systems. Nothing 
_ ' f more to buy! _^ 



460-1920 ' \ 

$279 95 



• ■••lit Shipping and Ihmjowcc 

-4WVL, 

Reviewed in 
'87 March 



SPECS i20cpsDralt.J5cp5 
MLO Italics, Sub& Superscripts. 
Emp'iasizod. Doubteslrike. Ptopo'ti 
Intomalional, User Datrnod Characters. 
Reverse pnnl. Graptl cs 4S0 1 °20 dots lino. 
Fnc'.on and. Tractor. 4K Butter. 



- — r-. Rainbow^ -r-~ 

Uona 1 . > t> / V\y\N>^ 

$229 95 



BLUE STREAK II SOFTWARE TRIO 



A serial to parallel interface ihai can increase 
your data transmission 4 fold over conventional- 
compatible interfacing. An additional serial I/O 
port permits pon sharing with another serial 
device without recabling. 



SPECS: 300to9G0OSvulcnaDle 
Baud Rates, t Yeai Warranty. Input 
4 Pin Serial. Outpul 36 Pin Parallel 
and 4 Pin Serial 



$49»5 + $2 Shipping 

iv/pmver suppl 

fS2 Shipping 



ojC JQ5 u /i" nu ' r supply 



Type Selection Tutorial Program 

Specify Slar/Scikosha/or Citi/ens Primer. 

Super Gemprinl Screen Dump 

S".\ 1 1 "(lump with grey level shading lor color. 

Drayon's Word Processor -■- 

Create, save & print customized documents. 

All Three Programs $1995$?^ 



DAYTON ASSOCIATES'^:?, INC. 

7201 CLAIRCREST BLDG. C 

DAYTON, OHIO 45424 

OHIO RESIDENTS ADD 6% SALES TAX • C.O.D. ADD $2.00 



PERSONAL SLRVICF.I 
(513) 236-1454 

Visa & MasterCard 
v nhin the continental I'.S. 



"Date Tracking Through the 
Ages" (January 1987, Page 46): 

Roger Bouchard has written to tell of 
some corrections to his program. 
The Last Calendar. First, Line 570 
should read: 

570 FOR ML=0TO BN-2: J=J+M 
(ML):NEXT 

Also, in lines 160 and 660, the 
value of 40 should be changed to 36. 
This value appears only once in each 
line. Finally, lines 100 and 1 10 con- 
tain the printer control codes neces- 
sary to enable the elongated charac- 
ter mode and disable this mode, 
repectively. Change them to suit your 
particular printer. 



"Escape From the Bug Zone" 
(January 1987, Page 58): Eugene 
Vasconi has informed us of some 
typographical errors that appeared 
in his article. These errors may be 
confusing to newcomers. Both errors 
appear on Page 59. First, the sixth 
line in column two should read: 

PLrW"T255L255;01; 
flBCDEF;XZ$;" 

The other error is in Line 35 of 
Column three. The sentence that 
contains the error should read: 

"Your problem then becomes 
the X=X*2 statement, which maybe 
needed to be an X=X+2." 

For quicker reference, Corrections 
will be posted on Delphi as soon as 
they are available in the Info on 
Rainbow topic area of the database. 
Just type DATA at the CoCo SIG 
prompt and INFO at the Topic? 
prompt. 
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Art Gallery 

Display Your Pictures With Sty\e/Tothian Software, Inc 135 

Bouncing Boulders 

A Gem of a Game/Diecom Products 139 

Bowling League Secretary 

Compiles Team Sco res/ Tomela'Co 140 

CoCo III Font Bonanza 

Four-Star Utility/Specfrum Projects, Inc 148 

CoCoSize 

Shape Up With CoCo/Kromico Software 143 

CMOS Conversion Kit 

Portable Power for the CoCo 3/CMOS Conversions 138 

Color Connection 

Telecommunications With Versatility/Compuferware 134 

Educational Software 

Rules of Writing/ York 10 Software 142 

Filesafe 

Lets You Control Program Access/ Emerald Island Software 145 

FKEYS III 

More From Your CoCo Keyboard/Specfru/n Projects, Inc 142 

Full Screen Editor & Varisave 

Convenience and Flexibility/ Wa/ren & Associates 144 

Introductory Spanish Courseware 

Help With Fundamentals/Dorseff Education Software 146 

Presidential Decisions of George Washington 

Match Wits With the President/65 Software 147 

Quotes 

So-So News for Game Show Buffs/S. Erickson Software 1 37 

Rocky's Boots 

Creative Problerm-Solving/7Y7e Learning Company 132 

Super Programming Aid 

Enhances CoCo 3 Capabilities/Sangerr Software Systems 136 

The Word Search Game 

Word Puzzle Generator/M/Tcaron Software 140 
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RECEIVED & CERTIFIED 



The following products have recently been received by THE RAINBOW, 
examined by our magazine staff and approved for the Rainbow Seal of 
Certification, your assurance that we have seen the product and have 
ascertained thai it is what it purports to be. 

This month the Seal of Certification has been issued to: 



An Algorithm That Works, a book 
that contains routines that make 
animation from BASIC look almost 
like machine language. The book 
explains the methods used and in- 
cludes listings of the routines plus 
tips on animation, programming 
techniques and a text screen clear 
subroutine. Right Brothers Soft- 
ware, 1173 Niagara Street, Denver, 
CO 80220; (303) 377-3409, $9.95 
plus $2 S/H. Accompanying disk, 
$5.90. 



BSS Disk Manager, a disk manage- 
ment utility for the CoCo 3. This 
program lets you view your disk 
directory, move, copy, print, re- 
name, transfer and kill files. Select 
a subset of names or work with the 
entire directory at one time. Bangert 
Software Systems, Box 21056, Indi- 
anapolis, IN 46221; (317) 262-8865, 
$14.95 plus $2 S/H. 

Backup, a backup utility for the 
CoCo 1, 2 or 3. This program fea- 
tures an onscreen window that dis- 
plays data being backed up; error 
bypass; 35-, 36-, 40- and 80-track 
compatibility; backs up 10 tracks at 
a time. Backup ///features all of the 
above but makes use of the full 128K. 
in the CoCo 3. Brainchild Software, 
Route #5, Calhoun. GA 30701; 
Backup , $8.95; Backup III, $10.95, 
plus $2 S/H. 

Bargain Disk, two-disk package 
containing classroom drill pro- 
grams. Titles include Build-A- 
Word, Guess My Word, Error Trap 
Spelling, Error Trap Number Facts, 



Guess My Number, Skip Counting, 
Robot Counting, Flash Card Drill 
and Counting Things. Thompson 
House, P.O. Box 58, Kamloops, 
B.C., Canada V2C 5K3; $22.95. 

Cave Walker, a 64K OS-9 program 
that combines the challenge of an 
Adventure with the excitement of an 
arcade game. Grab your hat and 
enter the legendary Cave of the 
Mystics. Within this underground 
palace, magical spells and treasures 
abound. Requires one disk drive 
and joystick, and features enhanced 
color graphics available under OS- 
9 Level II. Tandy Corporation, 
A vailable in Radio Shack stores 
nationwide; $24.95. 

Champion, an arcade-type Adven- 
ture game. Take on the role of 
superhero and become a crusader 
for all that is right and good. Use 
special powers to fight the criminal 
mastermind, Mr. Bigg, and his sin- 
ister followers. This 64K game has 
Hi- Res graphics and sound effects, 
and requires a joystick. Mark Data 
Products, 24001 Alicia Parkway, 
No. 207, Mission Viejo, CA 92691; 
(714) 768-1551, Disk only, $27.95. 

Color Computer 3 Basics and 
Graphics, a guide to using the CoCo 
3. Includes descriptions of the 64 
composite and RGB colors plus 
palette suggestions, as well as re- 
views of hardware and software for 
the CoCo 3. A disk with pictures 
and programs is provided. More ton 
Bay Software, 316 Castillo Street, 
Santa Barbara, CA 93101; (805) 
962-3127, $19.95. 



Computer Bible Trivia, a 64K game 
requiring one disk drive. This pro- 
gram contains over 600 questions 
about the Bible. Player selects book 
of the Bible and answers questions. 
For CoCo 1 , 2 or 3. Sovereign Grace 
Software, 221 Highview Drive, Ball- 
win, MO 63011; (314) 227-3238, 
$17.50 plus $2.50 S/H. 

The SECA Coupon Filer, a 64K 

management system designed to 
help the buyer track store coupons. 
This program will handle up to 200 
coupons, and the user can add, 
delete, search for expiration dates or 
select coupons for use. For CoCo 1 
or 2. SECA, P.O. Box 3134, Gulf- 
port, MS 39505; (601) 832-8236, 
Disk only, $19.98 plus $3 S/H. 



Directory Viewer, a 64K program to 
transfer and catalog directories of 
other disks to one index disk. The 
program will also let the user re- 
cover a lost disk due to a directory 
crash by transferring the directory 
from the index disk back to the 
damaged file. For CoCo I, 2 or 3. 
SECA, P.O. Box 3134, Gulfport, 
MS 39505; (601) 832-8236, Disk 
only, $19.98 plus $3 S/H. 

Disto Super RAM 3, a 512K mem- 
ory upgrade for the new CoCo 3. 
Includes step-by-step instructions 
for solderless installation. This 
plug-in card is compatible with OS- 
9 Level II. C.R.C. Computer, Inc., 
10802 LaJeunesse, Ste. 102, Mont- 
real, Quebec, Canada H3L 2E8; 
(514) 383-5293, $99.95. 
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FKEYS III Version 1.0, a function 
key utility designed for the CoCo I, 
2 or 3. Can be programmed for 20 
different functions using the Fl and 
F2 keys. Custom versions can be 
saved to disk and loaded into RAM 
or programmed into an EPROM. 
Spectrum Projects, Inc., P.O. Box 
264, Howard Beach, NY 11414; 
(718) 835-1344, $24.95 plus S3 S/H. 



File Viewer, a 64K program to 
enable the user to view all files on 
a disk on the screen at one time. 
Each file is displayed with its file 
code. Using one of the single com- 
mand keys, the user can load and 
execute most BASIC or machine 
language programs. For CoCo 1, 2 
or 3. SEC A, P.O. Box 3134, Gulf- 
port, MS 39505; (601) 832-8236, 
Disk only, $19.98 plus $3 S/H. 



Fourcube, a three-dimensial exten- 
sion of tic-tac-toe. The board con- 
sists of a 4-by-4-by-4 grid of cells 
and six levels of difficulty. This 32K 
game can be played by one or two 
players using the keyboard or joy- 
sticks. For CoCo 1, 2 or 3. Tom Mix 
Software, 4285 Bradford NE, 
Grand Rapids, Ml 49506; (616) 957- 
0444, Disk $18.95; Tape $15.95 plus 
$3 S/H. 



The SECA Fraction Review, a 64K 

high resolution game designed to 
aid the student in learning the basic 
concepts of adding and subtracting 
fractions. The student can select 
common and non-common denom- 
inators, and single- or double-digit 
denominators. Recommended for 
students in grades five through 
eight. For CoCo 1, 2 or 3. SECA, 
P. O Box 3134, Gulfport, MS 39505; 
(601) 832-8236, Disk only, $24.98 
plus $3 S/H. 

Gold Finder, a 32K arcade game 
requiring one or two joysticks. 
Players advance through 69 levels 



picking up pieces of gold while 
avoiding the enemies. For CoCo 1, 

2 or 3. Tom Mix Software, 4285 
Bradford NE, Grand Rapids, MI 
49506; (616) 957-0444, $27. 

Lunchtime, a 32K game requiring 
joysticks. Your chef, Peter Pepper, is 
surrounded. Dodge pickles, hot 
dogs and eggs while building ham- 
burgers. This Hi-Res game features 
seven levels of difficulty for one or 
two players. For CoCo 1, 2 or 3. 
Tom Mix Software, 4285 Bradford 
NE, Grand Rapids, Ml 49506; (616) 
957-0444, Disk $21.95; Tape $18.95 
plus $3 S/H. 

MYDOS, an enhancement to CoCo 

3 Disk BASIC 1.1 operating system. 
New commands include XRUN, 
which uses the same syntax as 
LORDM; LCfiSE to input in lowercase 
mode; MDIR lists a two-column 
directory to the screen and allows 
you to load and run a program with 
a point and click of the mouse or 
joystick; MOUSE puts all characters 
on the keyboard on the top two lines 
of the screen; VOICE controls RS 
speech synthesizer; SAY lets the 
computer talk to you. Versions are 
also available for the CoCo I and 2. 
Hawk soft, 307 Sexauer Avenue, 
Elgin, IL 60123; (312) 742-3084, 
Software, $15; Customized 
EPROM, $35. 

Soundscope, a 16K program to 
make sound waves visible. The user 
can play a cassette of music or 
conversation and view the continu- 
ally changing patterns onscreen in 
one of various possible modes. 



Screens can be frozen for closer 
study or printed using any screen 
dump program. Tothian Software, 
Box 663, Rimersburg, PA 16248; 
tape or disk, $19.95. 



Stop Burn, a machine language 
utility that darkens the text screen 
when you leave your CoCo unat- 
tended. Once installed, the program 
works automatically. Lucas Indus- 
tries 2000, 14720 Cedar Street NE, 
Alliance, OH 44601; (216)823-4221, 
$15. 



TV Blackout Bingo, plays up to 50 
bingo cards as you play your favor- 
ite TV bingo game. Supplied with 
the disk and manual is a code plug 
to be installed in the right joystick 
socket of the computer. For CoCo 
1, 2 or 3. Sunrise Software, 8901 
NW26th Street, Sunrise, FL 33322; 
(305) 748-0775, $19.95 plus $2 S/H. 



The Word Factory's Synonyms & 
Antonyms, a 64K high resolution 
game for one or two players to aid 
in learning the concepts of synonym 
and antonym usage. The program 
package consists of four separate 
programs: the game, a program to 
create new word lists, classroom 
multiple choice test sheets, and a 
spelling checker. For CoCo 1, 2 or 
3. SECA, P.O. Box 3 134, Gulfport, 
MS 39505; (601) 832-8236, Disk 
only, $19.98 plus $3 S/H. 



The Seal of Certification program is open to all manufacturers of products 
for ihe Tandy Color Computer, regardless of whether they advertise in 
THE RAINBOW. 

By awarding a Seal, the magazine certifies the product does exist — that 
we have examined it and have a sample copy — but this does not constitute 
any guarantee of satisfaction. As soon as possible, these hardware or 
software items will be forwarded to THE RAINBOW reviewers for 
evaluation. 

— Judi Hutchinson 
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You'll Get a Kick Out of 
Rocky's Boots 



If memory serves, we've had Rocky /through IV, Rocky 
Road (ice cream), Rocky and Bullwinkle, and now, just in 
time for those forlorn Rocky lovers, we have Rocky 's Boots] 

Indeed, an unlikely title for a book, magazine article or 
software review. But that is exactly what Rocky 's Boots is 
— software, and very good software at that. Written and 
designed by Warren Robinett, Boots has been ported over 
to the CoCo by The Learning Company. 

Boots is an exercise in science and logic cleverly disguised 
as a game. Somehow, kids seem to have a sixth sense about 
educational software — no doubt, aversion conditioning 
brought on by repeated exposure to tedious and often 
downright boring programs inflicted upon them by well- 
meaning parents. With Boots, parents may forgo any 
misgivings — Rocky answers the call! 

The program is entirely self-prompting — kids, not unlike 
their parents, hate to waste time reading the instructions. 
The program is essentially an electronic erector set, replete 
with AND, OR and NOT gates, wires, switches, timers, flip- 
flops, and the like. Rocky's world is divided into rooms, 
some containing equipment, others with sensors, targets, 
instructions and game selection menus. 

The first-time visitor is taught how to move through 
Rocky's world, and then is taken on a tour of the equipment 
areas and shown how to assemble the various components. 
After an initial exploration, the program explains concepts 
and principles involved in constructing machines utilizing 
AND, OR and NOT gates. The "inventor" (player) is then 
welcomed to the game area. Here, he is presented with a 
group of unique targets and three "sensors." Rocky's 
challenge is to construct a machine (circuit) that will cause 
Rocky's boot to kick a selected subgroup of targets off of 
the conveyer belt as they move by the various sensors. As 
each sensor is activated, the inventor observes the flow of 
electricity through his machine and immediately observes 
the result of his decisions. The rapid feedback loop to the 
inventor appears to be one of the central appeals of the game 
to young folks. As the game progresses, the inventor has 
to recognize positive and negative values, and identify and 
debug glitches in his circuit — all the while applying the 
rules of logic (Boolean, combinatorial and sequential) to the 
solution of the game. Before these principles may be 
successfully employed, the young inventor must add his own 
ideas of creative problem-solving to the game. The problem 
must first be identified. In doing this the inventor finds that 
heretofore unknown powers of abstraction and inference 
are called upon. While all of this is going on, the children 
I've observed playing Boots have had an almost deliriously 
good time! They like to think (if they don't realize that some 
folks equate thinking with work). To design and build a 
functioning, animated machine and then have the imme- 
diate opportunity to see if it, indeed, does work, is 
tremendously statisfyingfor kids of all ages. And if it doesn't 



work? The inventor has the immediate capability to redesign 
all or part of his creation and fire it up again. No solution 
is ever wrong, but young players soon realize that some 
solutions are more efficient than others. Given a chance, the 
youngsters I watched demonstrated insights that were 
absolutely astounding. I emphasize "given a chance," as it 
is a genuine struggle for any adult to watch the game 
progress without interjecting his own ideas and suggestions. 

There is no time pressure in Boots; each player proceeds 
at his or her own pace. With the absence of wrong answers, 
nearly all negative feedback is avoided. Rather, the entire 
structure of Rocky is aimed at immediate, positive 
feedback. The graphics are excellent, with screen designs 
that are attractive, but not so busy as to overwhelm the 
younger players. However, the joystick routines are 
mediocre at best. This appears to be the only real shortcom- 
ing. The joysticks react very slowly to the user prompts. As 
young folks are just developing fine motor and hand-eye 
coordination skills, the sluggish joystick response is a source 
of frustration in some cases. 

The documentation for Boots is on a level befitting the 
overall excellence of this package. Each level is fully 
explained, and suggestions and concepts are outlined for the 
benefit of interested parents and teachers. While the authors 
suggest that Boots is written for ages 9 and up, the concepts 
are sufficiently well-presented so younger children may 
thoroughly enjoy and benefit from exposure to Rocky and 
his "electrifying" world. At the other extreme, Rocky has 
the capability to expand and grow in complexity as the 
inventor gains experience. A fully featured game editor is 
provided that enables you to create totally original 
problems, and a game save feature is also provided — a 
necessary complement for the more difficult levels. Children 
of all ages have a limited attention span — and who wants 
to destroy an original creation that represents real effort and 
achievement? 

Boots is supplied on a single, unprotected disk recorded 
on both sides. Minimum system requirements are 64K with 
at least one disk drive. The use of a joystick, while optional, 
greatly enhances the quality of play. Side One supplies the 
required OS-9 Level I, Version 2.0 boot routine and game 
initialization schemes. After booting OS-9, the disk is 
reversed and the game auto-executes after pressing ENTER. 

Boots will run on the CoCo 3, but it does so in black and 
white on an RGB monitor. With an 8CM5I5 and CoCo 2, 
the graphics are quite satisfactory, and the artifacted colors 
are visible with the CoCo 3 in the composite input mode. 

The package jacket is liberally annointed with accolades 
from such diverse sources as Time Magazine, Popular 
Computing and The New York Times. It has received the 
"Software of the Year" award from Learning Magazine, as 
well as numerous other awards in the educational software 
arena. 

If you have a CoCo 2, and any children or a vestige of 
childlike wonder for exploration and creative thinking 
yourself, give Rocky's Boots a try — you won't be 
disappointed! 



(The Learning Co., 545 MidtiTefield Rd., Suite 170, Menlo 
Park, CA 94025; 415-328-5410, $34.95. Available in Radio 
Shack stores nationwide) 



Henry Holzgrefe 
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Computer Island Educational Software 



PROGRAM TITLE 


GRADES 


MEMORY 


PRICE 


PROGRAM TITLE 
MATH 


GRADES 


MEMORY 


PRICE 


PRESCHOOL 










Preschool 1 - counting 


Pre-K 


16K-Ext. 


11.95 


Opening a Bank Account 


4-7 


32K-disk 


24.95 


Preschool II - adding 


Pre-K 


16K-Ext. 


11.95 


Dollars & Sense 


2-4 


16K-Ext. 


14.95 


Preschool III - alphabet 


Pre-K 


16K-Ext. 


11.95 


McCoco's Menu 


3-5 


16K-Ext. 


14.95 


Music Marvel-play songs 


Pre-K, 1 


16K-Ext. 


11.95 


Moneypak 


2-5 


32K-Ext. 


24.95 


Arrow Games-6 games 


Pre-K, 1 


32K-Ext. 


21.95 


Graph Tutor 


3-7 


32K-Exf. 


19.95 


First Games-6 games 


Pre-K, 1 


32K-Ext. 


24.95 


Graph-It 


7-up 


16K-Ext. 


14.95 


Mr. Cocohead-facemaker 


K-3 


16K-Ext. 


16.95 


Math Invaders 


1-8 


16K-Ext. 


17.95 










Mathquiz-4 operations 


2-5 


32K-Ext. 


19.95 


LANGUAGE ARTS 








Addition & Subtraction 


2-3 


16K 


11.95 


Beyond Words 1-3 parts 


3-5 


32K-Ext. 


19.95 


Skill Tutor Series 








Beyond Words 2-3 parts 


6-8 


32K-Ext. 


19.95 


Division Tutor 


3-7 


16K-Ext. 


14.95 


Beyond Words 3-3 parts 


9-12 


32K-Ext. 


19.95 


Multiplication Tutor 


3-7 


16K-Ext. 


14.95 


Vocabulary 1-1000 words 


3-5 


32K-Ext. 


19.95 


Factors Tutor 


5-8 


16K-Ext. 


19.95 


Vocabulary 2-1000 words 


6-8 


32K-Ext. 


19.95 


Fractions Tutors o programs) 








Vocabulary 3-1000 words 


9-12 


32K-Ext. 


19.95 


addition, subtraction or multiplication 


4-8 


16K-Ext. 


19.95 ea. 


Context Clues 


4,5,6 or ' 


7 16K-Ext. 


17.95 


Trigonometry 


8-10 


32K-Ext. 


24.95 


Reading Aids - 4 parts 


2-4 


16K-Ext. 


19.95 


Equations Linear 


7-9 


32K-Ext. 


19.95 


King Arthur-writing tool 


2-6 


16/32 Ext. 


29.95 


Equations Quadratic 


8-11 


32K-Ext. 


19.95 


Cocowheel of Fortune 


4-up 


32K-Ext. 


19.95 


Arith. Diagnostic Disk 


3-8 


32K-disk 


49.95 


Context Clues 


2-3 


32K-Ext. 


19.95 


Fraction Diagnostic Disk 


4-9 


32K-disk 


49.95 


CLOZE Stories 


3.-1,5 6 or 7 


32K-Ext. 


19.95 


Verbal Problems Series 






Locating Story Details 


2-3 or "1-5 


32K-disk 


24.95 


Distance Problems 


5-8 


32K-Ext. 


19.95 


Drawing Conclusions 


3-4 or 5-6 


32K-Ext. 


19.95 


Area & Perimeter 


5-8 


32K-Ext. 


19.95 


Punctuation Practice 


3-7 


32K-Ext. 


19.95 


Pizza Game 


3-5 


32K-Ext. 


19.95 


FOREIGN LANGUAGES 






Sales & Bargains 


6-8 


32K-Ext. 


19.95 


French Baseball-200 wds. 


4-up 


16K-Ext. 


11.95 


Comparison Shopping 


4-7 


32K-Ext. 


19.95 


French Baseball-500 wds. 


4-up 


32K-Ext. 


19.95 


Binary Dice Game 


4-up 


32K-Ext. 


19.95 


Spanish Baseball-200 wds. 


4-up 


16K-Ext. 


11.95 


SOCIAL STUDIES 








Spanish Baseball-500 wds. 


4-up 


32K-Ext. 


19.95 


Know Your States 


5-up 


32K-Ext. 


19.95 


Hebrew Alphabet 


beginners 


16K-Ext. 


11.95 


History Game 


5-up 


32K-Ext. 


14.95 


Hebrew Utility 


drawing utility 


16K-Ext. 


15.95 


States & Capitals 


5-up 


32K-Ext. 


19.95 


CRITICAL THINKING PROBLEMS 






Explorers & Settlers 


4-up 


32K-Ext. 


19.95 


Find The Math Sequence 


4-up 


32K-Ext. 


19.95 


Famous American Women 


6-up 


32K-Ext. 


19.95 


Stranded-graphic advent. 


4-up 


32K-disk 


24.95 


Street Map Game 


3-5 


32K-Ext. 


19.95 


TEACHER/STUDENT AIDS 






MISCELLANEOUS 








Colorgrade-gradebook 


Adult 


32K-disk 


29.95 


Name That Song 1,2 or 3 


2-up 


16K-Ext. 


11.95 


Quizmaker-write quizzes 


5-up 


32K-Ext. 


24.95 


Music Drill 


3-up 


16K-Ext. 


19.95 


ETT typing tutor (CocoWarehouse 


4-up 


16K-Ext. 


21.95 


Science Game 


8-up 


32K-disk 


29.95 










Computer Literacy 


6-up 


32K-Ext. 


19.95 


Disk indicates available on 
Tape prices given. 


disk only. 






5 Educational Programs 
with Lightpen 


1-2 or 
3-6 


32K-disk 


44.95 


Add $5.00 tor any program 


on disk. 






Chemistry Tutor 


10-up 


32K-disk 


29.95 




RAINBOW 

CERTIFICATION 
SEll 




(718) 948-2748 
Dept. R 227 Hampton Green, Staten Island, N.Y. 10312 

Send lor catalog with complete descriptions. 






Please add 51 .00 per order (or postage. N.Y. residents, please add proper tax. FREE set of BINARY DICE, including full directions, with 
orders ot 2 or more items. 



Dealer Inquiries Invited. 



TRS-80 Color Computer 



All Payments in U.S. Funds. 



Software Review, 



7r7Z\ 



Every CoCo Can Make the 
Color Connection 



Many changes have been made to the latest version of 
Color Connection from Computerware. This excellent 
telecommunications package has consistently reflected a 
high level of versatility, but with the enhancements for the 
new CoCo 3, this program is an outstanding value from any 
standpoint. 

When you buy the program, you are supplied with a 
version for the earlier CoCos and the CoCo 3. Users of the 
earlier versions of Color Connection will readily recognize 
it; it has been enhanced to take advantage of the new CoCo's 
superior capabilities, rather than changed as a whole. It has 
three outstanding features that lift it head and shoulders 
above most other terminal packages for the Color Comput- 
er now on the market. 

The first of these is the capability of Color Connection 
to output 300, 600 and 1200 baud through the rear serial 
I/O port of the CoCo 3. This means that a 1 200 baud Hayes- 
compatible modem can be connected directly to the CoCo 
3, and the program's command sets will drive the modem 
for auto-answer/auto-dial. Some Radio Shack modems 
with auto-answer/ auto-dial are also supported. Color 
Connection can be used with the Radio Shack Deluxe RS- 



J&R ELECTRONICS 

Easy, Solderless Installation 
"JramR" 

51 2K COCO 3 Memory Expansion Board. Upgrades slock I28K COCO 3 lo lull 
51 2K for 0S9 Level II. Similar lo RS upgrade. 







COCO IS II ONLY 


Pan number 


Prill 


DBKilpticn 


•1001 


S39 95 


Banker II bare board (witti long pin socket, does nol include memory 
Expansion Board) 


moo? 


S69.95 


Banker li bare board + ports (does nol include Memory Expansion Board) 


•1003 


SB9.95 


Banker II assembled & tested (no memory) 


■ 1004 


S129 95 


Banker II (256K. upgradable to 51 2K) assembled & tested with memory 


• 1005 


S169 95 


Banker It (512K) assembled & tested with memory 


■ 1006 


S15.00 


Memory Expansion Boaid 


■ 1007 


S29.95 


Memory Expansion Board * pans 


ALL sollwate is contiguralile lor 256K/51 2K operation 


Sollware shipped 


mi disk, add sto.00 lor soltwaic on lapc (OSS RAMDISK no! available on lape) 


ALL Boards above 


are 256K:512K capable, sollware & documentation included 


New SAM (74LS785) nol included (use your 74LS783). 74LS785 recommended lor 2.0 Mm operation 






COCO 3 ONLY 


<10I0 


S39 95 


JramR bare board plus connectors and sollware 


• 101 1 


SI09.95 


JramR kit includes all pans plus memory chips and sollware 


(1012 


SI 39 95 


JramR assembled and tested plus memory chips and sollware 
Sollware includes — deluxe customizable ramdisk & spooler, memory 
(est. and ramdisk utility programs. 






MISCELLANEOUS 


"9002 


S5.00 


64 R Switch 


■9004 


S24.95 


New SAM 74LS785 (required only lot 2 MH: operation! 


"9005 


S24.95 


PowerBasic (Requires RS00S 1 or 1 1 and 256K or 512K Bankorl 
Utilize the extia memory lor variable storage and pass variables between 
programs in dilleient pages ol memory. Split a large BASIC program into 
smaller pieces and GOTO or G0SUB a lino in another page ol memory 
and moTO features Included (disk only) 


•9006 


SI0 00 


S'WPac upgrade, t XX to 2 XX 


■9007 


S19.95 


Soltware Pac lor COCO 3 includes deluxe ramdisk & spooler both highly 
customizable by user Memory lest and ramdisk utility programs 



To place an order, write lo J&R Electronics. P Box 2572. Columbia. MD 21045. 
OH call (301 ) 987-9067 - Jesse or (301 ) 788-0861 - Ray. 

HOURS Weekdays 7 n m -9p m . Sal Ncon-5p.m EASTERN TIME, usually, il no answer trylatei 
Add 54 00 shipping & handling (FOREIGN ORDERS S7 00). COD charge S3 00 Maryland residents add 
5% stale tax 

CHECKS. MONEY QROERS OR COD's only please (personal check-2 weeks lor clearance) IMME- 
DIATE DELIVERY Give COCO Radio Shack model * (i e. 26-3136), Disk or Tape when ordering 
QUANTITY DISCOUNT AVAILABLE For information on shipping or previously placed orders call (301 ) 
788-0861 COCO II 26-31 XX owners call (soldering experience may be required) 

Sollware includes — deluxe customizable lamdisk & spooler, memory icsl and ramdtsk utility programs 



232 pack, providing baud rates of 300 to 9.600 bps (bits per 
second). 

Color Connection's second outstanding feature is the new 
option 'G' from the main menu, the video set feature. This 
allows the user of the CoCo 3 with a color composite or 
the new Analog RGB monitor to set an amber, green or 
blue screen, or the inverses of these colors in 40-, 60- or 80- 
column widths. The image is incredibly crisp and clear in 
all modes on theCM-8 RGB. The amber tends to look more 
like a lime green than a yellow, however. 

A third feature of this program is its file transfer 
protocols. Color Connection supports Xmodem, Xon/ Xoff 
and CompuServe 'B' protocol file transfer modes. This 
feature alone makes the program worth the purchase price. 
I tested the buffer dump and upload/download features of 
this program extensively and it operated flawlessly under 
all conditions. 



"This is a feature-packed 
program that can handle all 
your telecomputing needs . 



Several more added features should be noted: Color 
Connection has a 65K buffer. That is a full 65K of user space 
at a time. Buffer space remaining is displayed online in 
terminal mode. The CONTROL key is now used both for 
menu commands and to send control characters, instead of 
the CLEAR key. 

1 only found a few minor drawbacks to the program, 
which are at the annoyance level when encountered, but the 
prospective user should be aware of them. The manual is 
well-written and understandable, but must be read to fully 
utilize the program's features. There is no online help, and 
while the program is menu-driven, there are places where 
a specific answer is required to change an option and the 
manual must be consulted to determine how to do this. 

The control codes while online were not always func- 
tional. There were times when the computer was accepting 
or transmitting data when it simply would not respond to 
a control sequence until the transmissions had stopped. 
Lastly, in the Keyboard to Buffer feature, where the user 
can input directly to the buffer from the keyboard, it is 
possible to erase all or most of a screen of data by hitting 
the CLEAR key accidentally on the CoCo 3. Also, when I 
went to input more information after viewing a buffer, what 
had been there was gone. So save that buffer first. 

Aside from these drawbacks, this is a feature-packed 
program that can handle all your telecomputing needs, most 
effectively, with class and with style. There is, of course, the 
disk-based introduction to data communications, which can 
teach the new user quite a lot about what is going on behind 
the scenes with a modem. I recommend the Color Connec- 
tion for the Color Computer 3 without reservation. 

(Computerware, P.O. Box 668, Encinitas, CA 92024; 619- 
436-3512, $49.95 plus $2 S/H) 

— Jeffrey Parker 
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Art Gallery Displays Your 
Pictures With Style 



If you are the type of computer buff who enjoys showing 
off your CoCo picture collection. Art Gallery will really add 
some pizazz to your show. 

Art Gallery is a graphics utility for your 32K ECB Color 
Computer 1, 2 or 3 and requires one disk drive. The BASIC 
and machine language programs are not copy-protected, so 
back-up copies for your own use are not a problem. 

Upon running GfiLLERY, a title page is displayed, 
prompting you to select in which PMODE you want to display 
your pictures. You can select 3 or 4, with a default of 4 when 
you press ENTER. You will then be asked which graphics 
screen you want. You can select or 1, with a default of 
I . Next, the program asks what extension is used to identify 
your pictures. You can choose PIX, PIC or whatever 
extension is used for the pictures on your disk. I should 
point out here that this program will not display CoCo Max 
or Graphicom pictures. 




The program is written to read picture files that are four 
pages, or 6,144 bytes (6K) long. Details are provided in the 
one-page instruction sheet that explains how to re-save 
pictures that are non-standard or machine language 
generated and can be made to read OS-9 based pictures 
created with Micro- Illustrator. 

After typing in the picture file extension, a second screen 
appears that allows you to choose from 1 1 special effects. 
It's nearly impossible to describe what each of these special 
effects does, so just take my word for it when I tell you that 
here is where the fun begins! 

After making your selection, you are asked if you want 
to display one or all of the pictures on your disk. You are 
also asked how long you want each picture to be displayed 
in seconds. If you select for all special effects and 5 for 
display time, then a combination of all the special effects 
will be used to display the number of pictures you chose. 

I tried all of the options on several of my favorite picture 
disks and was delighted with the results. My favorites were 



the curtains, nested squares, mirror and slices. I guess 1 liked 
slices better than all of them. The picture appears in ever- 
widening bars, like looking through Venetian blinds as they 
gradually open. All of them are good and many reminded 
me of the special effects we see in commercial TV graphics 
productions. Several sample pictures are included on the 
disk to get you acquainted with the various features, but 
I found my own collection of digitized pictures to be the 
most interesting. 

As with most any computer program, this one is not 
without flaws. I found two design problems with Art 
Gallery. The first was that when selecting the special effects, 
the choice is not displayed. This causes some minor 
confusion, since you are never quite sure if your selection 
was actually made. The second and more serious flaw occurs 
if you select only one picture to be displayed. After this 
selection is made and the picture is displayed, you are 
returned to the same submenu to select another single 
picture. I was unable to figure out how to get back to the 
main special effects menu without breaking out of the 
program and re-running it. 

In spite of these two problems. Art Gallery is still a good 
program. On a scale of I to 5, I give this one a 4. 



(Tothian Software, Inc., Box 669, Rimcrsburg, PA 16248; 
$19.95) 



— Jerry Semones 



Formatter 

clean paperwork for business 

"it will give the small or home business professional-looking 
forms and effortless, errorless totals, accounting for taxes, 
discounts, shipping and deposits." 

The RAINBOW, May 1986 

/^ 

RAINBOW 



menu driven 

customize for vour company 

on screen Instructions 

creates: Invoice, quote, purchase order, 

mall order, receipt, letter 
printer customization 
and much, much more 
"You have to look good to the customer 
helps by providing neat, well-prepared forms 

The RAINBOW, May 1986 



$49 



32K ECB dlSC 

This program 



Makes learning so much FUN . . . rainbow 
. . . that kids think it's a game! ""»'" 

Letter and number recognition. Ages 2 to 6 

$24 32K ecb disc or tape 
"If you are looking for a program to teach young children 
the alphabet, numbers and early vocabulary, super tutor 



may fit the bin: 



The RAINBOW, June 1986 



send for more Information: 



Challenger Software 

42 ath Street 

Pennsburg, pa 18073 

Call (215) 679-8792 (Evenings) 
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Super Programming A id 
Enhances CoCo 3 Capabilities 



By C.L. Pilipauskas 



Here they come! The new CoCo 3 hasn't been out very 
long, but already programs are starting to show up. I had 
figured that with all the new graphics capabilities and 
increased speed, my first review for the CoCo 3 would be 
a game. To my surprise, I'm reviewing a utility — Super 
Programming Aid. 

This utility was written lor the CoCo 3 and takes 
advantage of some of its new capabilities. It is designed to 
aid the BASIC programmer by adding features not found on 
the CoCo 3. The version 1 received (Version III) is on disk 
and contains six programs. The first is a BASIC loader 
program (SPA.BflS), which can be customized and which 
loads the actual utility (5Pfi.BIN), 

Also included are the default command table 
(SPATBL.BIN), a printer spooler (5PL.BIN), a command 
editing program (SPREDIT.BflS), and a sample command 
table file (SAMPLE.BIN). This utility is not copy-protected 
and should be backed up before using. 

The program is well-documented with a 33-page manual, 
and it explains the use of the program fairly well. The only 
major omission from the documentation is examples. This 
program is complex enough to warrant some, especially for 
the beginner programmer. 

The functions of Super Programming Aid are activated 
by a series of keystrokes starting with the control key (CTRL) 
followed by another key or a shifted key. If you've ever used 
a computer or terminal that used the CTRL key for anything, 
you know it is used like the SHIFT key — press and hold 
while hilling another key. In this utility, the CTRL key is used 
as two separate key presses. Press and release the CTRL key, 
and then press and release the other key to activate I he 
function. 

Super Programming Aid includes the following features: 

1) Aulo Line Numbers — Automatically generates line 
numbers as you lype in your BASIC program; you pick the 
starling number and the range. Il has error-checking that 
prevents accidentally typing over existing lines. 

2) Screen Editing A line editor similar to the Extended 
BASIC line editor, with some additional features such as 
insert mode, overtype mode, delete, cursor movement by 
arrow keys and line number editing. When you press the 
keys to go to the end of the line, you don't go to the last 
character in the line but to the end of the basic line buffer. 
If only a few characters are in the BASIC line, the cursor ends 
up several blank lines away. 

3) Keyboard Clicker — Creates a noise when a key is 
pressed; can be toggled on or off. 

4) Suspend Command Suspends (hides and protects) 
the current program in memory and allows you to load and 
edit, run another program or append the second program 
or file. 



5) Copy Command Screen editor function that non- 
destructive^ copies a chunk of the BASIC program elsewhere 
in the same program; does extensive error-checking to 
prevent overwriting existing codes. 

6) Move Command Another screen editor function. 
This is a destructive copy (deletes the original code after the 
move) and does the same error-checking as Copy Com- 
mand. 

7) Find Command Searches for a string up to 17 
characters long in the BASIC program in memory; allows for 
multiple search of the same string. 

8) Program Terminate — "Unhooks" itself from BASIC in 
an orderly fashion and stops execution of the utility. 

9) Scrolling Up or Down Allows for line-by-line 
viewing of the program in memory. 

10) Typ-O-Matic — Toggles on or off the auto-repeat of 
a key held down for more than half a second and continues 
until released. 

1 1 ) basic Program Formatting Reformats the way the 
basic program is listed by breaking up long statements into 
pieces determined by the':' and printing each piece indented 
on a separate line. 

12) Clear Key Disable Turns the CLEAR key on or off 
to prevent accidental erasure of a line while it's being typed 
in. 

13) Command Keys - Allows you to define any key 
(some exceptions are listed in the manual) to represent any 
sequence of keystrokes you want. This feature is an option 
when you start the utility. If chosen, it loads in a table of 
key definitions, either the default provided by the author 
or one you generate with the Command Editor Program. 

14) Screen Print Command - Prints anything on the 
high resolution text screen (40- or 80-character) to the line 
printer. With this feature, an optional print spooler can be 
activated when you first run this program -- allowing 
multitasking of the printer and basic. 

15) Programmable Command Key - This is one key that 
is not defined by the utility, so you can use it for whatever 
you want. It can be defined and redefined, but it can't be 
saved like the others. 

As you can see. Super Programming Aid provides a 
wealth of features. It is available for the older CoCos and 
the manual describes a procedure for converting Command 
Tables from Versions 1 and II to Version III tables. 

To summarize a bit, this utility adds many features that 
could make life easier for a BASIC programmer. It provides 
outstanding error-checking to prevent you from acciden- 
tally doing anything destructive. The manual is extensive 
but might be a little confusing to the neophyte. 

I was not able to discover any bugs or problems with this 
program while I was using it, and I tried! 1 feel adding key- 
repeat to the line editor and scrolling, putting more 
examples in the manual, and changing the editor to stop 
at the last character in the buffer could improve this 
program. 

If you do a lot of BASIC programming, you should find 
Super Programming Aid helpful. 



(Bangert Software Systems, P.O. Box 21056. Indianapolis, 
IN 46221; 317-262-8865. $29.95 plus $2 S/H) 
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Quotes: So-So News for 
Game Show Buffs 



Aha! Caught you .... There you go, sneaking off to go 
watch game shows again. Come back for a second, will you? 
I'd like to talk with you about some new Color Computer 
software. It works on a 32K CoCo I, 2 or 3 (in CoCo 2 
mode) with a disk drive, and can really be loads of fun. 
What's that? You can't miss Wheel of Fortune! It's your 
favorite game show? Well, read on. 

Quotes by B. Erickson Software is a game for one to eight 
players based on The Wheel of Fortune. Just pop the copy- 
protected disk in the drive and type LOADfTQUOTES". Pretty 
soon, you and your friends will be buying vowels, guessing 
letters, and trying to figure out what the famous quote, 
saying, or proverb really is. But it's the wheel you'll have 
to watch out for. It can give you up to 5,000 points for a 
correct answer, depending on where it lands, or it can 
instantly make you bankrupt. After the wheel tells you your 
fate, you can either guess at a letter, buy a vowel with $100 
of your hard-earned cash, or try to guess at the whole 
phrase. 

Just in case you need to brush up on how to play. Quotes 
is accompanied by a well-written booklet that thoroughly 
explains the program. 

Quotes has practically everything the TV show has, with 
the exception of a hostess to turn the letters. Oh, also, no 
prize boats or cars here. You do, however, have 256 quotes 
that will be randomly presented for your guessing pleasure. 
This should be enough to keep you busy for a while, but 
you may run into repeats more often as you keep playing. 
More quotes wouldn't hurt. 

But, before all you Wheel of Fortune addicts go running 
to your checkbooks, let's balance the positive and negative 
sides of Quotes. 

On the positive side. Quotes is a fun game, especially if 
you enjoy the game show. It is well thought-out, and bug- 
free. And, you can have all your friends over to gather 
'round and play for an evening. 

On the negative side. Quotes has no graphics, just text, 
and while this is formatted well, it isn't as visually enticing. 
Further, I found the game to get rather boring after playing 
for a while. Now, there are probably tons of Wheel of 
Fortune fans out there who would disagree, but I still feel 
that, while fun at first, the game gets tedious rather quickly. 

Finally, Quotes is, in my estimation, overpriced for what 
it actually does. If the game had graphics or 1,000 quotes, 
I could easily see paying $25 for it, but not as it now stands. 

Still, if you do like games such as this, I think you'll find 
Quotes a well-organized, well-written game. It really 
depends on whether this sort of thing is your cup of tea. 

(B. Erickson Software, P.O. Box 11099, Chicago, IL 60611; 
312-276-9712,525) 

— Eric W. Tilenius 
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Back copies of many issues of the 
RAINBOW are still available. 

All back issues sell for the single issue 
cover price. In addition, there is a $3.50 
charge for the first issue, plus 50 cents 
for each additional issue for postage and 
handling if sent by United Parcel Service. 
There is a $5 charge for the first issue, 
plus a $1 charge for each additional issue 
on orders sent by U.S. Mail. UPS will not 
deliver to a post office box or to another 
country. 

Issues July 1981 through June 1982 
are available on white paper in a reprint 
form. All others are in regular magazine 
form. VISA, MasterCard and American 
Express accepted. Kentucky residents 
please add 5 percent state sales tax. In 
order to hold down costs, we do not bill 
and no C.O.D. orders are accepted. 

Due to heavy demand, we suggest you 
orderthe back issues you want now while 
supplies last. 

To order, just fill out the form on the 
next page and mail it with your payment 
to: 

THE RAINBOW 

The Falsoft Building 
P.O. Box 385 
Prospect, KY 40059 
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BACK ISSUE ORDER FORM 






(See overleaf lo 


instructions.) 






(Payment must accompany back issue orders. We do not bill.) 




D Please send me the following back issues: 




NO. 


MONTH YEAR 


VOLUME 1 


PRICE I 


1 1 


JULY '81 


PREMIER ISSUE 


$2.00 Di 


I 2 


AUGUST '81 




$2.00 □ 


I 3 


SEPTEMBER '81 


EDUCATION 


$2.00 nl 


4 


OCTOBER '81 


PRINTER 


$2.00 DI 


5 


NOVEMBER '81 




$2.00 Dl 


I 6 


DECEMBER '81 


HOLIDAY 


$2.00 □[ 


I 7 


JANUARY '82 




$2.00 Dl 


1 8 


FEBRUARY '82 




$2.00 D| 


9 


MARCH '82 




$2.50 D 


I 10 


APRIL '82 




$2.50 □ 


1 12 


JUNE '82 


VOLUME 2 


$2.50 □ 


I 11 


JUNE '83 


PRINTERS 


$2.95 D 


12 


JULY '83 


ANNIVERSARY 
VOLUME 3 


$2.95 □ 


| 1 


AUGUST '83 


GAMES 


$2.95 nl 


1 2 


SEPTEMBER '83 


EDUCATION 


$2.95 D| 


3 


OCTOBER '83 


GRAPHICS 


$3.95 □ 


1 5 


DECEMBER '83 


HOLIDAY 


$3.95 D 


I 8 


MARCH '84 


BUSINESS 


$3.95 □ 


1 9 


APRIL '84 


GAMING 


$3.95 nl 


1 10 


MAY '84 


PRINTER 


$3.95 D 1 


11 


JUNE '84 


MUSIC 


$3.95 Di 


1 12 


JULY '84 


ANNIVERSARY 
VOLUME 4 


$3.95 a 


1 1 


AUGUST 84 


GAMES 


$3.95 D| 


2 


SEPTEMBER '84 


EDUCATION 


$3.95 Dl 


> 3 


OCTOBER '84 


GRAPHICS 


$3.95 Di 


I 4 


NOVEMBER '84 


DATA COMM. 


$3.95 D 


5 


DECEMBER '84 


HOLIDAY 


$3.95 D 1 


1 6 


JANUARY '85 


BEGINNERS 


$3.95 D| 


7 


FEBRUARY '85 


UTILITIES 


$3.95 Dl 


1 8 


MARCH '85 


BUSINESS 


$3.95 D 


1 9 


APRIL '85 


SIMULATIONS 


$3.95 D 


1 10 


MAY '85 


PRINTER 


S3.95 D 1 


!ii 


JUNE '85 


MUSIC 


$3.95 D 1 


12 


JULY '85 


ANNIVERSARY 
VOLUMES 


$3.95 D 


| 1 


AUGUST '85 


GAMES 


$3.95 D 1 


2 


SEPTEMBER '85 


EDUCATION 


$3.95 D | 


3 


OCTOBER '85 


GRAPHICS 


$3.95 D 1 


1 4 


NOVEMBER '85 


DATA COMM. 


$3.95 D 


1 6 


JANUARY '86 


BEGINNERS 


$3.95 D 1 


1 7 


FEBRUARY '86 


UTILITIES 


$3.95 D 1 


8 


MARCH '86 


BUSINESS 


$3.95 D 1 


1 9 


APRIL '86 


HOME HELP 


$3.95 D 1 


1 10 


MAY '86 


PRINTER 


$3.95 D 


11 


JUNE '86 


MUSIC 


$3.95 D 1 


I ' 2 


JULY '86 


ANNIVERSARY 
VOLUME 6 


$3.95 D | 


I 1 


AUGUST '86 


GAMES 


$3.95 D 


1 2 


SEPTEMBER '86 


EDUCATION 


$3.95 D 1 


1 3 


OCTOBER '86 


GRAPHICS 


$3.95 D 1 


4 


NOVEMBER '86 


DATA COMM. 


$3.95 D 


1 5 


DECEMBER '86 


HOLIDAY 


$3.95 D 1 


1 6 


JANUARY '87 


BEGINNERS 


$3.95 D 


1 7 


FEBRUARY '87 


UTILITIES 


$3.95 D 1 


8 


MARCH '87 


BUSINESS 


$3.95 D | 


! 9 


APRIL '87 


HOME HELP 


$3.95 D I 


1 RAINBOW INDEX A complete index !o 


our first three years, July 1981 


1 throu 


gh June 1984, is printed in its entirety in our July 1984 issue. 


■ Separately bound copies are also availa 


Ble$2.50 D 
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CMOS Conversion Kit: 
The Chips Are Down 



This product consists of two 40-pin chips wrapped in 
antistatic plastic. These are Hitachi HD63B2IPand Hitachi 
63B09EP chips. These two chips are accompanied by 
information and suggested circuitry on how to make your 
CoCo 3 "portable." 

The first page of the instructions points out how much 
less power the 63B09E uses than does the 68B09E. It 
presents quite accurate electronic specs to document this. 
It also correctly points out that the 63B2I uses about '/i2 
the power of a 68B21. The documentation also correctly 
points out that the GIME chip in the CoCo 3 is a low-power 
CMOS chip that consumes far less power than the old SAM 
VDG combination in the older model CoCos. So far so 
good. 

But then the instructions allege that if you replace your 
CoCo 3*s 68B09E with their 63B09E and your 68B21 with 
their 63B2I you will have taken a significant step toward 
making your CoCo 3 portable. They provide a suggested 
circuit for running your CoCo 3 from a 1 2-volt battery pack. 

However: 

1) Both the 68B09E and the 68B21 on the CoCo 3 are 
soldered directly to the board. Removing and replacing 40- 
pin ICs without damaging the PC board is not a trivial 
matter, even if you are a skilled electronic service technician. 

2) The amount of power consumption reduction afforded 
by the Conversion still amounts to only about a 20 percent 
total reduction in use by the CoCo 3. 

3) Furthermore, their suggested circuit for running the 
CoCo from that battery uses a monolithic linear regulator 
to drop 12 volts to regulated 10 volts, then allow that 10 
volts to be dropped to regulated 5 volts by the CoCo's 
inefficient on-board linear regulator circuitry. This is poor 
design in a "portable" unit, for such design throws away, 
as heal, over half of the available power in the battery pack. 
The right way to achieve portability is to use efficient 
switching power converters to produce regulated 5 volts, 
and feed that directly to the CoCo board. 

4) You still need to use a monitor with your "portable" 
computer, and you still need to hook up a disk drive, and 
power that stuff in some way as well. 

Finally, CMOS Conversions is asking $49.50 for the 
63B09Echipand$l9.50forthe63B21 chip. I called my local 
Hitachi regional office, got the name of my local distributor, 
and they informed that the single quantity price of the 
63B09E is S 12.50. and the single quantity price of the 63B2I 
chip is S3.5I. 

In conclusion, this product consists of misinformation on 
power supply design applications and two overpriced 
Hitachi ICs. 

(CMOS Conversions, 480 Oakdalc Road NE #3, Atlanta, 
GA 30307; 404-681-0581, 63B09E chip, S49.50; 63B21 chip, 
$19.50) 

— Marty Goodman 
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Bouncing Boulders: 

A Gem of a Game 



Bouncing Boulders is a funny, fast-paced arcade game for 
the 64K. ECB Color Computer. A joystick is optional but 
highly recommended. The program is supplied on tape or 
disk and is copy-protected, but Diecom will replace it during 
the first year if problems arise. 

After loading, the program executes automatically. A 
color test screen precedes the main title and score screen. 
Ten levels of play are incorporated, with each getting 
progressively more difficult. 
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The object of Bouncing Boulders is to move your man 
around the screen and collect all of the buried gems, then 
advance to the next and harder screen. When you have 
collected all of the gems on a particular screen, the screen 
flashes green and sounds a tone to signal you to go to the 
flashing exit square. If you fail to complete the screen within 
the allotted time, you lose a man and have to start over. 
Your time, men left, gems left and level of play are all 
displayed at the bottom of the screen. 

1 found this game to be highly entertaining and a lot of 
fun to play. The graphics and animation are excellent, 
especially the smooth movement of the boulders and gems 
as they fall. As you move your man through the red clay, 
you have to be careful when digging under or next to the 
boulders, which can fall on top of you. Since the boulders 
are round, they can also roll sideways and drop down in 



See You at 

RAINBOWfest-Chicago 

April 10-12 



the open spaces that you created while digging. You can 
push the boulders out of your way by holding down the 
firebutton, but you can only push one boulder at a time. 

You also encounter various alien creatures that hinder 
your progress, but you can destroy them by leading them 
under falling boulders. If you get caught by one of the aliens, 
you lose a man. There are other surprises as well that make 
the game even more fun. A nice feature is the ability to pause 
and gather your wits without being penalized. If you find 
yourself blocked, you can restart the screen but you sacrifice 
a man. 

After you develop your skills enough to begin advancing 
to the harder screens, you can restart the game at the screen 
prior to the last one you completed. This is a good feature 
because it prevents the boredom of having to replay the 
easier screens each time. Disk users also get to add their 
names to the score page indicating the top 10 players. 

So for a fun, fast, colorful and challenging experience, 
I recommend Bouncing Boulders. After digging around for 
a few hours, you soon understand why diamonds and other 
precious gems are so expensive. TheyYe awfully hard and 
dangerous to mine! 



(Diecom Products, 6715 Fifth Line, Milton, Ontario, 
Canada L9T 2X8; 416-878-8358, S28.95 plus $2 S/H) 



— David Gerald 




A unique approach 
to disc reliability 

Memory Minder from J&M Systems is 

one "i* the most comprehensive disk 
drive diagnostic programs available for 
microcomputers. It quickly and easily 
runs comprehensive iesting of all vital 
operating parameters to assure data 

Integrity. 

Data Integrity 

Means Data Confidence 

Memory Minder is 50 easy to run you 

will he inclined In test your disk drives on 

a regular basis and correct problems he- 
fore they ever endanger ynur data. This 

program provides lung term confidence 

in your data integrity. 



Memory Minder is currently available 

lor the following: 

Version 1.03 

TRS-80 Model HI/4 

48 tpi Single Side 

48 tpi Double Side 

9fi tpi and 48 tpi Double Side 

TRS-80 Model-I 

■18 tpi Single Side Single I tensity 

TRS-80 Color Computer and 

TOP- 100 

■18 tpi Single Side 

48 tpi Double Side 



Technical Knowledge 
Not Required 

Simply slip in the Memory Minder disk 
and select one or more of eight sophisti- 
cated tests. Easy to understand graphics 
on your screen display findings in a few 
moments. Now you can discover poten- 
tial misalignments and problems before 
they endanger your valuable data. 

Call or write for details and 
more information 

i//A 

J&M SYSTEMS, LTD. 

15100-A CENTRAL SOUTHEAST 

ALBUQUERQUE. NM 87123 

505/292-4182 

We accept MasterCard and Visa 
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The Word Search Game 
Supplies Tough Puzzles 

The Word Search Game from Mikaron Software is a 
hidden word puzzle generator for the 64K Color Computer 
with a disk drive. It generates random puzzles covering 
many different subjects (e.g., animals, NFL teams, automo- 
biles, etc.). 

The program comes with a single sheet of instructions, 
which adequately explain program operation. It should be 
noted that onscreen instructions are also provided. Loading 
the program brings up a high resolution screen, which 
utilizes a very nice-looking character set. This same set is 
used for all program screen displays. 

A menu for puzzle subject selection is first presented. 
Once you make a choice, the screen clears and a "wait" 
message appears while the program takes a couple of 
minutes to generate the puzzle. When the puzzle is 
displayed, the user locates the hidden word, then moves the 
cursor over each of the letters, pressing the space bar each 
time. When the word is completed on the puzzle, it is crossed 
off the master word list. Using the SHIFT-CLEAR combina- 
tion brings up a command level menu, offering options for 
(G)ame, (H)elp. (P)rint, (M)ain menu and (Q)uit. 

Up to five copies of the puzzle can be directed to a printer 
with an optional answer template. Baud rates of 600 or 1 200 
can be selected for printing. 

The only fault I can find with the program is that the 
puzzles are in a 30 by 16 grid. This makes for a very 
challenging puzzle. If the user could generate smaller 
puzzles, the program would be more suitable for younger 
family members. Of course, for more advanced puzzle 
workers, this may be considered a plus. 

One question that is becoming of more and more 
importance to CoCo owners today is compatibility. I 
encountered no problems running the program on either my 
CoCo 3 or CoCo 2. 

Overall, the program is attractive and well done. It offers 
good value for the money. If you like word search puzzles 
and want a challenge, The Word Search Game could just 
be for you. 

(Mikaron Software Company, P.O. Box 1064, Chester, CA 
96020; Disk Only, S16.95) 

— Leonard Hyre 



Bowling League Secretary 
Revisited 



In the September 1986 issue of THE RAINBOW, 1 reviewed 
a new software product. Bowling League Secretary by 
TOMELA*Co. This product is a specialized database that 
provides the record-keeping and calculations needed to 
maintain individual and team standings in a bowling league. 
Since that review, the author has issued an updated version 
of the program, Version 1.1. This version provides the 
capability to maintain separate bowling statistics for men 
and women in a mixed bowling league. 

Version LI. like its predecessor, is a well-organized, 
menu-driven program with very good documentation. The 
program is designed for a 32K Color Computer with one 
disk drive and will handle a league of up to 200 bowlers. 
A printer is almost mandatory, since the league secretary 
must prepare and post reports showing weekly scores and 
summaries of team and individual standings in the league. 

The program, which actually consists of several programs 
written in BASIC, performed as described in the documen- 
tation. As expected, it ran on my CoCo 3 without problems. 
I should mention that those with CoCo 3s can reduce the 
sort time of the program by using the high speed poke. 

The only problem I found is that there is no reporting 
capability for the preparation of an individual bowler's 
scores for the entire bowling season. TOMELA*Co noted 
in a letter published in the January 1987 issue of THE 
RAINBOW that they agreed with this comment, but that it 
was not possible to include this feature without requiring 
two disk drives. This issue is probably minor since most 
secretaries would keep the raw tally sheets from each week. 
However, TOM ELA*Co is working on another version that 
would incorporate this feature. 

Bowling League Secretary is higly recommended to those 
who spend considerable time each week compiling league 
bowling scores. TOMELA*Co is to be congratulated for 
submitting updated versions of their program. 

(TOMELA*Co, P.O. Box 2162, Doylestown, PA 18901; 
$49.95) 

— Donald D. Dollberg 
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Variety is the spice... 



MAX FONTS 1, 2, 3 or 4 Each set contains 24 fonts that are professionally 
designed and ready to use with CoCo MAX I or II. Each set includes a custom "pull 
down menu" that is used by CoCo MAX for selecting the fonts. Just "click" and use 
the same as any other font with CoCo MAX. 



Buy 2 sets and SAVE 10%, any 3 and SAVE 15%, 
all 4 and SAVE 20%! 



$24.95 each (disk) 



SET I 



SET 2 



SET 3 



SET 4 



Digital medium 

Digital Large 
Futura 
Grid Small 

GIRIIID LORCE 
HAIFA 

naif MM aascffiim 

Victory 

Baby Taafh tumtt 

BABY TLLTH LC 

ecec oeie 

Gavrtinrlnaal 
Normnnde Small 

\ or 111,1 Milt- Medium 

NORMANDE LG. 

Piano 



-jfciWty^Wt 



crtattlow 

Holoii 

wabarajab 



MDU«S*Ka|EaGlhO 



Ptiq»-ol SmaII 

F*eic,noT Larce 

F'prc-FinM j mi i 

PFOCRnn riEaium 
PHOEFIfim LHPJjE 

I'olui ;i lllni:k SSiiiiiII 

iimiitA iki.il:. i.i; 

i i.-i iii-i * r-t5i jirTiZit 

laiUUHJ >_«._•_■ I I M_ 

HocaOB Cmoaa 

Mocnofl JIapre 

Miii 

POIIIT OUT 

Priniiuuli 5iuidII 

PRIDTGLIT LF1REE 
IVIOP 



Bocklin 
Crcadway 

IBIRiC'AIDM'A.V ENlGR, 



#31Myjj? 



zr? 



OU UngUsl, 

UHBaH 

X«r««> JmoII 

XiKXiS MCMUM 
XikXiS LAKri 

ceLtfc 

HARTLAND 



STIsNCII. 



Ti man 

Tip Top 



chfriu^ctiuiM 

i n iiii nTrrrnriff 

cbonii 

AAAAAA 

TJdln 



Roma Small 

Cli-quo 
fEfQUDllRBDIP 

cBcffl *oc 



■M- Hh r~> E^fl """^ 



SlHV/ER 

Square 
«r«?2Sc 



TELEWRITER-64 The word processor that has lead the 
way for over half a decade. Check out Cognitec's ad in this 
issue for all the features! Interface graphics with it using 
TELEGRAPHICS m% 



TELEGRAPHICS Interface HI-RES graphic displays from 
CoCo MAX or other graphic programs with Telewriter-64. Design 
a logo or letter head and have access to it whenever you're using 
Telewriter-64! .«,„»- ,. 

$24.95 (disk) 

SIDE WISE makes your printer do something you never thought 
possible -print sideways! SIDE WISE will read ASCII text files 
generated by your spread sheet program and print them clown 
the page instead of across. This allows you to indicate a printer 
width of up to 255 characters! No more having to hold 2 or 3 
pages together to get the entire picture of your work sheets. 
Compatible with DYNACALC and ELITE CALC. 

524.55 (dh 



CoCo MAX II The most used and highly acclaimed graphic 
editing program for the Color Computer 1 or 2. Just look at 
Colorware's ad in this issue for all the features! 

$79.95 (disk) 

MAX EDIT Create your own fonts for use right in CoCo MAX 
l/ll or load in existing FONTS for adding your own flair! Use all 
CoCo MAX options such as BOLD. ITALICS and SHADOW. 

$19.95 (disk) 



Derringer Software, Inc. 

PO Box 5300 Florence. SC 29502-5300 
Visa/MC customers call (803) 665-5676, 
or send check or money order. 

In business since 1982. 

SC residents add tax. 

Shipping: $3 UPS ground, $12 air mail (overseas) 

Canadian Distributor: Kelly Software 
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Communicate Effectively With 
Rules of Writing 

When we want to communicate an idea to a large number 
of people, we need to be able to write effectively. One of 
the ways we can learn how to do this is to use the self- 
development course that is available from compass 
education. This software is only available on cassette tape, 
as all of the programs contain both audio and visual 
presentations of the material. It's designed to run on your 
CoCo 1,2 or 3. 

Volume One of Rules of Writing deals with writing 
effectively, logic in writing, developing simple and complex 
sentences, paragraphs and diction. Volume Two continues 
with parts of speech, punctuation and spelling, as well as 
writing letters, reports and papers. 

At one time or another, everyone needs to put his 
thoughts into writing. The student needs to write term 
papers or book reports. Adults might need to write reports 
about their jobs. To do this effectively, you must follow 
certain rules. These study courses show you the way to 
arrange your thoughts and ideas in a logical way. You will 
also see how to write these thoughts down. 

The other night we had a friend over who is a computer 
teacher at a local elementary school. 1 was telling her about 
this course of software I have been reviewing. Linda was 
very interested in seeing how it worked, so we went to CoCo, 
and put on the Rules of Writing study course. 

Linda was particularly impressed with the audio portion 
of the programs. She felt that this would indeed aid in the 
students' learning process. She felt, as I do, that the 
programs are set up in a logical and well-presented format. 
At the end of each lesson plan, you are shown a scoreboard 
that shows the number of questions asked, the number 
answered right on the first try, and the number of wrong 
answers. 

If you do a great deal of writing, or you just want to be 
able to write a good letter, then these programs should be 
useful to you. 

(York 10 Software, 9525 Vassar Avenue, Chatsworth, CA 
91311; 818-700-0330, S49.95 per two-volume set plus S/H) 

— John H. Appel 



Him . . . 

Hex of a Good Conversion 

Keep in mind that converting from hexadecimal 
to decimal and vice versa is simple if you let your 
CoCo do the work. To convert from Hex to 
decimal, just enter PRINT &Hxxxx where xxxx is 
any Hex number up to four digits. 

To go from decimal to Hex, enter PRINT HEXS 
[decimal number). You must use parentheses here. 
On the CoCo 3 you can also convert an octal 
number to decimal by entering PRINT &0XXXX just 
as you did for the Hex conversion above. 

H. D. Cooke 
Wilmington, VT 



Get More From Your 
Keyboard With FKEYSIII 

FKEYS 111 Version 1.0 is a handy utility for all models of 
the Color Computer with at least 64K RAM. It provides 
a method to program various keys for special or repetitive 
functions. 

The program, supplied on disk, is not copy-protected, so 
back-up copies are not a problem. FKEYS III runs in the all- 
RAM mode, which is auto-loaded when first running the 
program. The program is very easy to use and is menu- 
driven. Upon running MENU, the user is presented with these 
options: Configure New FKEYS, Load Custom FKEYS, 
Accept Default FKEYS, Disable FKEYS and DOS 
Modifications. 

Configure New FKEYS, Option 1, allows you to set up 
the keys of your choice to provide whatever function you 
want. It also allows you to choose either the CONTROL key 
if you have one on your keyboard or the down arrow if you 
don't. 

Option 2, Load Custom FKEYS, allows you to load in 
the custom function keys that you have previously saved 
on the disk. Option 3, Accept Default Keys, will load in the 
default function keys. 

Keep in mind that you can change any of the functions 
using Option 1. All CoCos using the new style keyboards 
with Fl and F2 keys can have 20 functions. By using the down 
arrow as a control key on older style keyboards, the user 
can define 18 functions. 

Option 4 disables the function keys. 

DOS Modifications, Option 5, allows you to modify DOS 
for single- or double-sided drives and 35- or 40-track, and 
to change the track access speed from 6 to 30 ms. 

Another nice feature of FKEYS III is that the entire 
modified DOS from &HC080 to &HDFFF can be saved to disk 
and then used to burn an EPROM if you would like all of 
the special functions available at power-up. A special touch, 
I thought, was the ability to send a list of what each function 
key does to your printer. This is especially helpful if you 
have different functions programmed for different applica- 
tions. 

The menu options coupled with the ability to save custom 
versions of FKEYS III provides a lot of versatility since you 
can have many versions available for different program- 
ming or operating circumstances. 

I like FKEYS III. It provides a useful function and can 
result in significant time savings, especially in program- 
ming. You could program different keys for often repeated 
statements and commands like GOTO, GOSUB, FOR, NEXT, 
PRINT 8-2, SAVE, LOAD, etc. 

The price of FKEYS ill is reasonable, and the documen- 
tation is sufficient to provide easy operation right out of 
the package. So, if you are looking for a quick and easy 
way to put those new Fl and F2 keys to work on your CoCo, 
then I recommend you consider FKEYS 111. 

(Spectrum Projects Inc., P.O. Box 264, Howard Beach, NY 
11414; 718-835-1344 S24.95 plus S3 S/H) 

— Jerry Semones 
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Get in Shape With CoCoSize 



It's easy to start an exercise program. Just ask me; I've 
started dozens of them! Obviously, the trick is to stay on 
a program. Support groups (such as classes at a gym) are 
great. Arranging to participate in a regular program in your 
home with a friend or spouse can also help. Unfortunately, 
those options aren't right for everyone, and just plunging 
in on your own can be tough. CoCo to the rescue! 

CoCoSize from Kromico Software can be your exercise 
partner. This program, on disk with no copy protection, 
creates a graphic representation of a person who performs 
any of six different exercises while you follow along. Jane 
Fonda it ain't, but the representation is certainly accurate 
enough to portray the suggested exercise. The exercises 
available includejumpingjacks, push-ups, sit-ups, chin-ups, 
toe touches and running in place. 

Upon selecting one of these from the main menu, the user 
is prompted for the number of repetitions (10-99) and the 
pace (slow, medium or fast). Following the selection, time 
is allowed for the user to get to the exercise area and assume 
the position before CoCo begins. 

F 1 



1 




The other choices from the main menu include Create 
Workout and Do Workout. The user can create and name 
a workout file, including any or all of the six exercises, in 
any order, for a chosen number of repetitions at a chosen 
pace. A quick workout, for when you're pressed for time, 
could be programmed and named SUEQUICK. A more 
thorough workout could be programmed and named 
5UEHARD. A workout file including all six exercises uses only 
one granule of disk space. With 28 free granules on the 
program disk, there should be plenty of space for everyone 
in the family to have several custom exercise programs. The 
Do Workout option displays a menu of all of the workout 
files. 

A minor weakness of CoCoSize is the documentation. 
There are 1 1 screens of instruction displayed by the program 
(if requested), none of which is included as hard copy. Most 
of these screens are the "press any key to continue" variety, 
but two of the screens are displayed for an interval 
determined by the program. These two screens pertain to 
"create" and "do." The instructions for "create" are a bit 
vague, and neither screen is displayed long enough for my 



liking. I understand that the instructions in this area have 
been revised for a subsequent version of CoCoSize, so this 
mav be solved. 



"A workout file including all 
six exercises uses only one 
granule of disk space. " 



Admittedly, CoCoSize is easy to use once you figure out 
how. Unless you have a better memory than I, however, 
you'll find yourself wanting to review the instructions at 
some point. After the instructions have been viewed initially 
and the actual program is underway, the only way to return 
to the instructions is to exit to BASIC and start all over. 

When entering number of repetitions and pace for each 
exercise to create a workout, the values entered are not 
displayed. This is inconvenient when putting together a 
complicated workout and I would expect this bug to be 
remedied in subsequent versions. 

CoCoSize works well and is a real bargain. I recommend 
it to anyone wanting to use the CoCo for less sedentary 
activities. 

(Kromico Software, 708 Michigan Ave., Sheboygan, WI 
53081,59.95) 



— Stanley Townsend 



THE SOFTWARE HOUSE 

A DIVISION OF DATANATCH. INC. 



PROGRAMMERS 
E> I SKS 



UIOW ■ 



1 i2» FOR * 5 - 95 

5121 FOR *SO- 95 

1IZJ<2» FOR *49_ 95 

W/SLEEVES, LABELS, N.P. TABS 

MADE IN USA! CERTIFIED ERROR FREE. 

5 YEAR WARRANTY 



FLIPPY DISKS 



10/*B.95 



FACTORY PUNCHED - USE BOTH SIDES 
PRINTER RIBBONS 

EPSON MX/RX/FX 70/80 S5.00 Ea. 

RED, GREEN, BROWN, BLUE S6.00 Ea. 

GEMINMO/10X/SG10 S2.00 Ea. 

GEM/OKI COLORS S3.00 Ea. 

OKIDATA 80/82/92/93 S2.00 Ea. 
C.ITOH.NEC 8023. APPLE 

DMP/IMAGEWRITER S6.00 Ea. 

RED, GREEN, BROWN, BLUE S6.50 Ea. 

ALL ITEMS 100% GUARANTEED 



6/S28.00 
4/S22.00 

DOZ/S22.00 
4/S 10.00 

DOZ/S22.00 

6/S34.00 
4/S25.00 



Add $2.50 S/H in U.S.A. - Canada Add $3.50 + $ 1.00/LB 
Michigan Residents Add 4% Sales Tax 
Send Check/Money Order Payable to: 
THE SOFTWARE HOUSE 

23552 PLYMOUTH, REDFORD, MI 48239 

(313) 255-9850 

Send Card Number 8 Exp. Dale Min. Charae Order $20.00 
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Full Screen Editor & 

Varisave: Convenience and 

Flexibility 



Some people may be afraid to tackle a utility with the 
complexity and flexibility of this one, but such users 
normally do not do enough of their own programming to 
need the Full Screen Editor & Varisave {FSE (or short). 

What does the FSE really do? It is primarily intended to 
provide the BASIC programmer with a word processor-like 
ability to move around the screen while correcting program- 
ming errors as they are found, rather than correcting them 
line by line. Along the way, this approach has also provided 
the ability to copy program lines, move or combine them, 
locally renumber them and perform many other editing 
functions. 

"So what?" you say, "I have the EDIT command in 
Extended Color BASIC, and 1 own three other screen editors 
making similar claims. 1 never use any of them because they 
are all inconvenient, or take too much memory, or . . . ." 
Well, this one will probably get used because it works, takes 
no memory and is user-tolerant. Furthermore, the docu- 
mentation fully explains what is being done and why. 

FSE requires 64K and Extended Color BASIC. The 
program requires 64K because it rewrites the ROM code 



TANDY COMPUTER 
DISCOUNTS 

COLOR COMPUTERS 



26-3127 64k color comp 


89.95 


26-334 CoCo 3 


170.00 


26-3131 1st disk drive 


269.95 


26-3215 CM-8 color monitor 


259.95 


PRINTERS 




26-1276 DMP 105 


160.00 


26-1277 DMP-430 


580 00 


26-1280 DMP-130 


269.00 


MODEL 4 and MSDOS COMPUTERS 


25-1050 Tandy 1000 EX 


530.00 


25-1051 Tandy 1000 SX 


850.00 


25-01011 Plus expansion board 


155.00 


25-1023 CM-5 color monitor 


249.95 


25-1020 VM-4 Monochrome monitor 


110.00 


26-1070 mod 4D 64k 2dr. 


920.00 



We Carry the Complete Line of Tandy 
Computer Products at Discount Prices 

CALL FOR A FREE PRICE LIST 800-257-5556 
IN N.J. CALL 609-769-0551 

WOODSTOWN ELECTRONICS 

Rt. 40 E. WOODSTOWN, N.J. 08098 



(that is also how it does its job without using memory). This 
means it is intended to be EPROMed and thus loads 
normally at power-up as a self-booting portion of your 
system. I used it instead as a normal utility off disk and 
found that satisfactory. It should work also from tape 
systems. 

Vernon Nemitz's Full Screen Editor & Varisave claimed 
compatibility with all Color Computer variants. I tested it 
on an old 'F' Board, two CoCo 2s of different vintages, a 
CoCo 3, and two other machines. Because of the number 
of options in FSE, I never completed all options on any one 
machine, but probably tried all major options "somewhere." 

The utility was quite reliable and reasonably bug-free. 
You could, however, put one or more options temporarily 
out of business by trying them on an odd combination of 
non-standard DOS/ ROM mixtures, or by trying to 
combine FSE with other software that uses undocumented 
ROM calls. 



"With all this complexity, the 
documentation and support are 
amazingly complete. " 



My experience is that FSE worked on all combinations 
tried, but that it was possible to find minor differences 
among versions. Most of these are mentioned in the 
documentation, which is excellent. Installation should take 
under an hour, including familiarization runs. 

With all this complexity, the documentation and support 
are amazingly complete. They form a tutorial on the ROM 
code in the CoCo that is worth more than the price of the 
utility itself. The disk is not copy-protected, and users are 
encouraged to make backups. I would certainly buy and use 
this convenient and helpful utility. 

Supplied with FSE, but requiring a separate loading 
operation, is the utility Varisave. Normally, a new BASIC 
program automatically re-zeroes all stored variables. With 
Varisave, you can selectively clear only part of memory, 
enabling easy transfer of variable names and their related 
string and/or numeric data. The CLEAR command is 
redefined to perform this function selectively. Varisave does 
take a small amount of memory, and improper loading of 
it will crash the computer, so decide on its use before your 
session starts. (This point is well stressed and explained in 
the manual.) 

FSE also includes a redefined and improved TR0N 
command, error-trapping similar to that built into the 
CoCo 3, the ability to generate any CoCo semi-graphics 
symbol and/ or any BASIC tokenized word with only two 
keystrokes, and a new command — Into. Into allows a 
mixture of direct command and normal run modes, 
enabling the computer to perform self-editing. There are 
other options as well — but buy it and see them for yourself. 

(Warren & Associates, P.O. Box 5120, Virginia Beach, VA 
23455; 804-456-1589, S25 plus SI. 50 S/H) 

— H. Larry Elman 
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Control Program 
Access With Filesafe 



Filesafe is a program that deserves attention. It's a 
machine language program that will protect any standard 
RS-DOS disk file, including BASIC programs, word 
processor and data files. It will run on any 64K or 32K Color 
Computer, including the new CoCo 3, using Disk BASIC 1.0 
or 1.1. 

While most of us are somewhat familiar with file 
protection schemes using passwords to encode and decode 
the files, this one has a unique feature. Your copy of Filesafe 
encodes differently from any other copy of the program. 
What this means is that even if someone else has your 
password they cannot decode your protected file unless they 
are using your copy of the program. So as long as you 
control your personal copy of the program you can control 
who has access to your files. 

Filesafe is not copy-protected. You are urged to make a 
back-up copy for your own protection. Because of the 
structure of the program, you must use only the standard 
RS-DOS BACKUP and COPY commands. The documentation 
consists of a nicely typed 10-page instruction manual in a 
clear plastic folder. I found the instructions easy to 
understand and follow. 

Running the program is simple. Just type LOflDM 
"FILESAFE" and execute. A copyright notice appears and 
a prompt is presented to select the drive you want to work 
with. Then press any key to start the program that reads 
the directory of the disk you selected. A menu page appears 
next, which provides the various program options. Up and 
down arrows are used to scroll the directory to select the 
file you want to encode or decode. You can also perform 
other functions using the following commands: 

1 — File Information. Displays the name and extension 
of the file you have selected. It also tells you the file type 
such as data, BASIC, machine code, etc. The file format is 
displayed and shown as binary or ASCII. The program 
length in granules and the encryption status are displayed. 

E — Encode File. You are asked twice as to your intent 
to encode the file you have selected. Next you enter a 
password of one to 16 characters including spaces. You are 
warned to write down your password so you don't forget 
it. The file is then encrypted and the extension ENC replaces 
the original extension. 

D — Decode File. This is just the opposite of Encode File 
with one exception. If you do not enter the correct 
password, the file will be destroyed. 



See You at 

RAINBOWfest — Chicago 

April 10-12 



P — Purge File. Similar to KILL in RS-DOS except all 
of the file is erased; not just the directory filename. 

R, -- Read Dir. Reads the disk directory in the drive 
selected. 

S — Show File. If the file has been encrypted, or is in 
machine language, you can't see anything. If the file is BASIC 
or ASCII and not encrypted, it will be displayed on the 
screen. 

Q — Quit Program. Exits Filesafe and does a cold start. 

C — Change drive. You can select which disk drive you 
are using. 

I found Filesafe to be very easy to use and user-friendly. 
I tried it on several programs and it performed as discussed 
in the instruction manual. Looking at encrypted files with 
a disk zapper or word processor resulted in only garbage 
on the screen. It has a lot of potential for those CoCo users 
who want total protection of their computer programs and 
files. While such protection is afforded by this program, you 
must exercise a great deal of caution since incorrect 
passwords not only deny entry into the program but destroy 
it as well. 

The program's author, John Gallagher, has done a nice 
job on Filesafe and its documentation. A 30-day replace- 
ment warranty is offered and the price is right for what it 
does. 

(Emerald Island Software, P.O. Box 11126, Cleveland, OH 
44111; $22 plus $2 S/H) 

— David Gerald 



<«GIMMES0F7>» 

A new generation oS 
CoCo III software 

HHH1I1 [IBS 

A user friendly, user prograiable function 
key utility that creates up to 20 function 
keys. Other features include DOS iods, 
DISABLE, and is EPRONable. Compatible with 
CoCo I/Il and includes enhanced CoCo III 
version! Ver 1.3 - Disk only $19.95 



nULTl-LA&EL 111 

UERSION 1.0 



V 



^Z 




An easy to use, versatile label creating 
prograi including iany new CoCo III 
features. Even if you already own a label 
prograi, this one's a aust for the III!! 

Disk $14.95 

GIHHESOFT 

4 Hall held Ct. Add $2.50 for shipping 

Baltimore, HD 21236 Phone 301-256-7558 
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Learn the Fundamentals With 
Introductory Spanish Courses 



For years I have been reading about quick and easy ways 
to learn a foreign language, usually using a set of tapes. If 
those ads were really true, it would put me out of my job 
as a high school Spanish teacher. But there is nothing quick, 
and certainly nothing easy about learning a foreign 
language. Analogies to learning a computer language are 
only partially valid; computer languages seldom have 
exceptions, 50,000 word vocabularies, emotional content, 
or listening and speaking aspects. In light of the difficulty 
of learning a foreign language by yourself, how well does 
a new set of programs from Dorsett Educational Systems 
called Introductory Spanish Courses do? 

These programs come as eight cassette tapes, recorded on 
both sides, in a 5-by-7 inch plastic package. It is available 
only as a cassette program and will not work with anything 
plugged into the expansion port. 

A machine language "monitor" program must be loaded 
from either Tape 1 or Tape 9 before any program can be 
used. Once it is loaded, typing EXEC begins the program. 
All characters and illustrations are done on the graphics 
screen. 

Although the character size allows the same 32 letters by 
16 lines on the screen, they seem larger by virtue of their 
shape, light-on-dark presentation, and skillfully laid out 
screen arrangements. The background screen is black and 
the letters are white, with underlining and drawings in 
various colors. The screens are equally visible on a 
monochrome monitor, so equipment necessary to use this 
program is minimal. 

If you know anything about "programmed instruction" 
(no reference to computer programming here), then you 
understand the method in these tapes. After loading and 
executing the program, you leave the cassette player on 
"play." Real voice narration is supplied by the tape, playing 
through the television. 

Text and illustrations are also fed throughout the 
program by the cassette tape. The documentation suggests 
setting the monitor at a volume level of 7, which is high. 
This is good advice. Turn it high and leave it high. If, at 
any time, you can hear the machine coding through the 
speaker, it is not being loaded properly. When it happened 
to me, it was solved by turning the volume up on the cassette 
recorder. 



POLICE OFFICERS and others 

If you are involved in the reconstruction of motor vehicle 
accidents or would like to learn, this program is a must. 
The program is extremely user friendly. It allows you to 
enter just your road measurements. The computer will 
give you the speed of each vehicle at the point of impact. 
Answers output to screen or printer. Complete In- 
structions for the beginner. This program is written for a 
64K COCO ECB disc. It is easily adaptable to other 
RADIO SHACK computers. Order RECON today. 
Price $39.95 Plus $2.50 S&H MA Res. add 5% sales tax. 

Bytes Bits & Chips Computer Shop 
P.O. Box 42, Chicopee. MA 01014 



Explanations are given, illustrations are shown on the 
screen, then an answer is requested from the keyboard. If 
the answer is right, the narrator tells you so, and the lesson 
continues. If your answer is wrong, you hear an annoying 
tone, the screen clears, and the correct answer appears, 
sometimes with a short explanation. 

Any key returns you to the prompt screen, with your old 
answer still sitting there for you to correct. The answers are 
either multiple choice or fill in the blank. The lesson 
continues until the end of the tape, when a scoring screen 
displays the number of questions presented, the number of 
correct answers on the first try, and the number of questions 
missed. 

Having gone through all 16 sides of the eight tapes, I can 
vouch for the accuracy of the explanations and text, and 
for the quality of the pronunciation. A woman's voice offers 
the explanations. A man's voice speaks the Spanish words 
and phrases. I find it valuable to highlight the Spanish by 
presenting it in a different voice. It also offers the student 
a chance to hear Spanish from both a male and a female 
voice, since the narrator uses Spanish in her explanations. 

The lessons presented cover the basics of a first-year 
Spanish course and offer, according to the ad, a vocabulary 
of 250 words. This series is not for younger children, 
however, for two reasons. The explanations are not 
simplified. Such phrases as "in an exclamatory fashion" and 
"affirmatively" are used. And the material is presented at 
a pace that requires the attention of a serious student. 

This program addresses three of the four skills involved 
in language learning: reading, writing and listening. Except 
for some minor program bugs, I think it does so accurately 
and effectively. While this would be a very good way to begin 
independent language study or brush up on a past Spanish 
course, I immediately thought of using it on my students 
who have missed or failed to learn particular grammar 
points or specific verb conjugations. 

I found five or six problems, but none of them seriously 
hamper the program. In one case, the wrong word is 
underlined. In another, the letter 'S' appears as '9' in a word. 
The most serious bug is one spot when two lines must be 
completed for an answer. Advancing from one line to the 
next is normally done by pressing ENTER. On one screen, 
however, only pressing BREAK, then another key, would 
allow the program to continue, picking it up on the next 
screen. In spite of these flaws, I heartily recommend this 
set of tapes for anyone who wants to get a foundation in 
understanding Spanish, supplement classroom instruction 
on the first-year level, or review the fundamentals. 

The only recommendations I have for Dorsett are to 
make a companion booklet available, as well as a detailed 
list of contents for each tape. Since the tapes are linear, i.e., 
they are used straight through, there is no going back to 
find a word or verb form that was covered previously. 

A booklet that reiterates the material would be very 
helpful. A list of tape contents is needed to guide anyone 
wanting to use the tapes for review of specific items. I have 
hopes that these will soon be available, since many of the 
other programs that Dorsett offers, from math to language 
arts, do have study guides. 



(Dorsett Educational Systems, Inc., P.O. Box 1226, 
Norman, OK 73070; 800-654-3871, S99) 

— Dennis Church 
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Software Review! 



r/R\ 



See if You Agree With The 

Presidential Decisions of 

George Washington 



It's a tough job being president, but someone's got to do 
it. Presidential Decisions of George Washington, by B5 
Software, gives you the chance to become the "Father of 
Our Country" without leaving your own home. The game 
is an educational Simulation intended for grades 7 through 
adult. It requires a Tandy Color Computer with 32K, 
Extended Color BASIC, and one disk drive. The package 
comes with one disk and a small nine-page manual. The 
instructions are also included as part of the game, so the 
manual is not really necessary. 

During the game you are presented with 10 problems that 
President Washington had to resolve during his term of 
office. You are allowed to ask the advice of other people 
who lived during the time, reflect on the past, or obtain 
information on the overall effect of the problem. You may 
do this four to six times before making your decision. You 
are then presented with four decisions and must choose one. 

The object of the Simulation is to make the same decision 
George Washington did when he was president. If your 
decision does not match President Washington's, the actual 
decision made is then displayed with an explanation as to 
why that particular decision was made. You are then asked 
if you want to continue with the remaining problems. 

When you are finished, you may request a summary and 
score to see where you stand in making presidential 




decisions. Your answer and Mr. Washington's answer are 
both displayed for each problem presented. The answers are 
compared and rated on a scale of to 50. An overall rating 
is provided along with your percent of correct decisions. 

This Simulation is intended to be used as a supplement 
to classroom work when studying this particular period of 
history. Several suggestions are provided to aid in the use 
of the game. After playing awhile you can become hooked 
on this method of supplementing classroom instructions. 

Overall, Presidential Decisions of George Washington is 
well done. It would be a good addition to your history 
lesson. 

(B5 Software Co., 1024 Bainbridge Place, Columbus, OH 
43228; 614-276-2752, $31.95) 

— Larry Birkenfeld 



Hint . . . 

A Cure for the Stutters 

If your new CoCo 3, or your older Color 
Computer, doesn't "talk" to your printer in 
anything better than a stutter at higher baud rates, 
try increasing the line delay. The memory locations 
you should use are 151 and 152. Just enter 
P0KE151 , x: PDKE152 , y where x and y are from the 
following table: 



Line Delay 

.288 seconds 
.576 seconds 
1.15 seconds 



X 


Y 


64 





128 





255 


255 



Other values should work, as well. 



Bernie Besherse 
Ketchikan, AL 



Hint . . . 




The Place for Fun 


Following are some interesting addresses on the 


CoCo 3. The addresses are the entry points to the 


indicated routines. 


So, boot up EDTASM and 


have some fun! 




Address 


Function 


SF636 


WIDTH 


SE688 


HSCREEN 


SE6CF 


HCLS 


SE5F0 


PALETTE 


SE545 


LPOKE 


SE6F4 


HCDLOR 




Marc Gagnon 




Cap- Madeleine, Quebec 



ApriM987 THE RAINBOW 147 



Software Review! 



7/7Z\ 



CoCo III Font Bonanza 
Gets Four Stars 



After getting my CoCo 3 I was somewhat anxious to get 
software which used the features in the new machine. I am 
mostly interested in its graphics capabilities. For this reason, 
I was extremely happy to see CoCo III Font Bonanza come 
in for review. While it is by no means an applications 
package, it is an excellent tool for development of CoCo 
3 products. 

The CoCo 3 allows mixed text and graphics on the new 
Hi-Res screens. The user can HPRINT text on either of the 
two new graphics screens. The font used for this text is a 
standard font, which is located in RAM. Because it is RAM- 
based, this font may be altered, saved to disk and reloaded. 
This is how the Font Bonanza works. You can use the 
modifier to alter a character set or font in memory and then 
save it to disk for future loading. The font modifier is very 
easy to use. With a few simple keystrokes, you, too, can 
create your own CoCo 3 fonts. 

CoCo III Font Bonanza also includes several different 
fonts and a demo program which illustrates how to use the 
fonts. The fonts are designed to fit both the 40-column Hi- 
Res graphics screen (320 by 192) and the 80-column graphics 
screen (640 by 192). All that is necessary to use a given font 
is to load it from disk, issue BASIC commands for the desired 
graphics screen and then HPRINT the text to the screen. If 
you want to change between several different fonts regularly 
throughout a program, the Font Bonanza will accommo- 



One- Liner Contest Winner . . . 

This little beauty will calculate your grade percentage 
based on number of classes, credit hours and grade 
percentage for the individual classes. Don't blame us, 
however, if you don't like the results. 

The listing: 



1 CLS: INPUT" # OF CLASSES THIS SE 
METER" ; X : F0RI=1T0X : PRINT"ENTER G 
RADE & CREDIT HOURS FOR CLASS # 
" ; I ; : INPUTG , H : A=G*H : TA=TA+A : TH=T 
H+H: NEXT: PRINT "YOUR G.P.A. FOR T 
HIS SEMESTER IS ";TA/TH 



Anthony Frerking 
Independence, MO 



(For Ihis winning one-liner conlcsi entry. Che author has been senl copies of 
bol h The Second Rainbow Book of Simulations and its companion The Second 
Rainbow Simulations Tape.) 



date you. Included on the disk is a program called Multplex. 
This BASIC program allows you to squeeze up to eight fonts 
into one file. Then, you can switch between the fonts 
quickly, without having to load each one from disk 
separately. 



^^^7^^^> 


^^^T^^^^^^^^^^^^^^^^^ 


?• letters onto screen 




Use arrow keys to move cursor 




Use ALT* <l>-<8> to change font 




Use F2 


to choose 40.-'80 columns 




CoCo 3 


Font Bonanza 




Font Bonanza 




CnCn 3 


Font Bonanza 




COCO 3 


Font Bonanza 




CoCn 3 


Font Bonanza 




CoCo 3 


Font Bonanza 




nSi 


fail*. ^!>i>3r<i2D 

Font Bonanza 





I must clarify one point. The RAM-based memory font 
which the Font Bonanza is used for, is only accessible from 
the new Hi-Res graphics modes of the CoCo 3. The font 
used for the Hi-Res text screens (40- or 80-column) is not 
affected by this series of programs. In other words, you can 
not type in BASIC listings while using one of the special fonts. 
This is because the Hi-Res graphics and Hi-Res text screens 
are totally separate. 



HiRes Font Modifier by P. Mishra 
[JOYSTICK] CFIPE1 CBRK3 CENTER] 

Current char 
Decimal 162 
Hex 66 




□ 



F13 CF83 



All in all, I found CoCo III Font Bonanza very enjoyable 
and easy to use. The documentation is more than adequate, 
and the program does exactly what it claims to do. It is easy 
to see where we might be seeing several programs in the 
future which utilize fonts created with this package. CoCo 
III Font Bonanza gets a four-star rating. 



(Spectrum Projects, Inc., P.O. Box 264, Howard Beach, NY 
11414; 718-835-1344, $28.95 plus $3 S/H) 



— Cray Augsburg 
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# * * 

Clubs, Clubs, Clubs 

We compile a list quar- 
terly of Color Computer 
Clubs because of the 
many requests we receive. CoCo 
Clubs may wish to exchange 
newsletters, share ideas for top- 
ics of discussion at monthly 
meetings, etc. 

Please let us know if we have 
omitted any clubs and send us 
complete up-to-date addresses. 
Only those clubs that have 
signed our anti-piracy agree- 
ment form will appear in this 
listing of CoCo Clubs. Also, 
please notify us if you wish to add 
or delete any names on this list. 
Send your information to: 

CoCo Clubs 

THE RAINBOW 

The Falsoft Building 

P.O. Box 385 

Prospect, KY 40059 

* * * 



ARIZONA 

Tucson Color Computer Club, Bill Nunn, 9631 E. 

Stella, Tucson, 85730, (602) 721-1085 
CALIFORNIA 
Color America Users Group, Mark Randall, 2227 

Canyon Road. Arcadia, 91006, (818) 355-6111 

Los Angeles-Wilshire Color Computer Users' 
Group, Norm Wolfe, P.O. Box 11151. Beverly 
Hills, 90213, (213) 838-4293 

United Computer Federation, (San Fernando Valley 
Chapter and Headquarters), Pete Ellison, 366 
West Providencia Ave., Burbank. 91506, (818) 
840-8902 

United Computer Federation, (San Francisco 
Chapter), Art Murray, P.O. Box 7007, Redwood 
City. 94063, (415) 366-4560, BBS (415) 364-2658 

United Computer Federation, (Los Angeles Chap- 
ter), Gary James, 4147 Faculty Avenue, Long 
Beach, 90808 

United Computer Federation, (Orange County 
Chapter), Fred Wright, 10112 Melody Park 
Drive, Garden Grove, 92640 

The Davis CoCoNuts, Shneor Sherman, 1818 
Haussler Dr., Davis, 95616, (916) 758-3195 

South Bay Color Computer Club, Patricia Scheffer, 
1435 W. 172nd Street, Gardena, 90247, (213) 
371-2016 

South Bay Color Computer Club, Bill Tillerson. 73 
Alamitos Ave., Suite 2, Long Beach. 90802, (213) 
432-3037 

Ventura County Color Computer Club (VC4), Doug 
McLaughlin, Oxnard Public Library, 214 South 
"C" Street, Oxnard, 93030, (805) 984-4636 or 
BBS (805) 484-5491 

Citrus Color Computer Club, Jack Brinker, P.O. Box 
6991, San Bernadino, 92412, (714) 824-1866 

South Bay Color Computer Users Group. John G. 
Say. 3117 Balmoral Drive, San Jose, 95132, 
(408) 923-2967 



COLORADO 

Colorado Color Computer Club, Lloyd Carroll. 6651 
Bellaire Street, Commerce City, 80022, (303) 
288-6369 

The ESCO Computer Club, David E. Schulz, 1299 
Harrison Street, Denver, 80206, (303) 388-6988 

CONNECTICUT 

The Southeast Connecticut Color Computer Users 
Group, Bill Gross, 30 Sycamore Lane, Groton, 
06340, (203) 448-1388 

DISTRICT OF COLUMBIA 

Northern Virginia C.C. Club, Bruce Warner, 14503 
Fullerton Rd., Dale City, Virginia 22193, (703) 
690-2453 

FLORIDA 

Color Computer Club of Brandon, Richard Stein- 
brueck. 2913 John Moore Road, Brandon, 
33511. (813)681-1526 

Northwest Florida CoCo Nuts. Lee Gottcher, P.O. 
Box 1032, Fort Walton Beach, 32549, (904) 678- 
8894 

Alachua County Color Computer Club, Robert J. 
Lake, 2929 N.E. 12th Street. Gainesville, 32609, 
(904)378-1993 

Jacksonville Color Computer Club, William H. 

Brown III, 241 1 Hirsch Ave., Jacksonville, 32216. 

(904)721-0282 
CoCo Chips Color Computer Club, 71 5 5th Avenue 

NE, Largo, 33540. (813) 581-7779 
Broward County Color Computer Club, George 

Aloia, 2263 N.W. 65 Avenue, Margate, 33063, 

(305) 972-0975 
South Brevard Color Computer Club. Benjamin S. 

Jerome, 496 Hillside Court, Melbourne, 32935, 

(305) 259-4609 

CoCo Nuts of Central Florida, George Ellenburg, 
Box 593790, Orlando, 32859-3790, (305) 855- 
7867 

Color-6809 Users Group, Emery Mandel, 4301 1 1 th 

Avenue North. St. Petersburg, 33713-5207, (813) 

323-3570, BBS (813) 321-0397 
C.C. Club of Sarasota, Ernie Bontrager, 4047 Bee 

Ridge Rd., Sarasota, 33583, (813) 921-7510 
GEORGIA 
The Northeast Atlanta Color Computer Club, Joe 

Novosel, P.O. Box 450915, Atlanta, 30345, (404) 

921-7418 
The CoCo Cartel, Dennis M. Weldy, 4059 Acacia 

Drive, Columbus, 31904, (404) 576-5479 
Atlanta Color Computer Users Group, Terry E. 

Love, 5155 Maroney Mill Rd., Douglasville, 

30134, (404) 949-5356 

ILLINOIS 

Illinois Color Computer Club of Elgin, Tony Po- 

draza, 1 1 9 Adobe Circle, Carpentersville, 601 10, 

(312)428-3576 
Northern Illinois Color Computer Club, Kenneth 

Trenchard, Sr., 6145 N. Sheridan Road 30, 

Chicago, 60660, (312) 973-5208 
Willow-Works Club, Kevin L. Adair, 5753 S. Laflin, 

Chicago, 60636, (312) 737-5716 
Peoria Color Computer Club, Harold E. Brazee, 102 

Twin Oak Court, East Peoria, 6161 1 , (309) 694- 

4703 

Glenside Color Computer Club, Ed Hathaway, 8 W. 
Stevenson Drive, Glendale Heights, 60139, (312) 
462-0694 

Kitchen Table Color Computer Group, Robert Mills, 
P.O. Box 464, Hanover, 61041, (815) 591-3377 

Motorola Microcomputer Club, Steve Adler, 1301 
Algonquin Rd., Schaumburg, 60196, (312) 576- 
3044 

Chicago OS-9 Users Group, John Chasteen, 480 
Gilbert Drive. Wood Dale. 60191 , (31 2) 860-2580 

INDIANA 

Three Rivers Color Computer Club, R.R. 3, Box 269, 
Angola. 46703 

CoCo Program Exchange, Erik Merz. 3307 Arrow 
Wood Dr., Fort Wayne, 46815. (219) 749-0294 



Indy Color Computer Club, Kevin S. Jessup, Sr., 
P.O. Box 26521 , Indianapolis, 46236, (317) 873- 
5808 

Southern Indiana Computer Club, Route 1. Box 459, 
Mitchell, 47446 

Michiana CoCo Club, Clay Howe, 310 S. Jefferson 
St., Sturgis, 49091, (616) 651-4248 

IOWA 

CoCo Questers, Scott Bellman, 2420 Salem Court, 
Bettendorl, 52722, (319) 359-7702 

Metro Area Color Computer Club (MACCC), David 
E. Hansen, 3147 Avenue J, Council Bluffs, 
51501,(712)323-7867 

Mid Iowa CoCo, Terry G. Simons. 1 328 48th Street, 
Des Moines, 50311, (515) 279-2576 

Dubuque Tandy Users Group. Wesley Kullhem, 
1995 Lombard, Dubuque, 52001. (319) 556-4137 

KANSAS 

Hutchinson Color Computer Club, James M. Jones, 
612 Idlewild, Hutchinson, 67502, (316) 662-0718 

KC CoCo Club, Gay Crawford, P.O. Box 11192, 
Kansas City, 66111, (913) 764-9413 

Micro 80 Users Group, Kevin Cronister, 2224 Hope, 
Topeka, 66614, (913) 272-1353 

Color Computer Club of Wichita, Van Elliott, 532 

Brownthrush Lane, Wichita, 67212, (316) 722- 

7442 
KENTUCKY 
Perry County CoCo Users Group, Keith W. Smith, 

General Delivery, Hardburly, 41747. (606) 439- 

4209 
LOCO-COCO, Jim Spillman, 2405 Woodmont Dr., 

Louisville, 40220, (502) 454-5331 
LOUISIANA 
Cajun CoCo Club. Rick Herbert, P.O. Box 671, 

Crowley, 70526, (318) 788-3148 
MAINE 
Western Maine Color Computer Club, Michael 

Wewell, Box 780, Bethel, 04217 

Tandy Computer Club, Delmer Cargill, P.O. Box 
428, Westbrook, 04092. (207) 854-2862 

MASSACHUSETTS 

Greater Boston Super Color Users Group, Robert 
Biamonte. 6 Boulder Drive, Burlington, 01803 

Massachusetts CoCo Club, Jason Rahaim, Spring 
St., Lunenberg, 01462. (617) 582-6514 

CLUB 6809, Jean Salvas, 204 East Street, Spring- 
field, 01104, (413) 734-5163 

MICHIGAN 

Color C.H.I.P.S., Jack Pieron, 3175 Oakhill Place, 
Clarkston, 48016, (313) 627-4358 

CCUG (Color Computer Users Group), Rich Van 
Manen, 0-599 Lake Michigan Dr., Grand Rap- 
ids, 49504, (616) 453-8351 

Tandy Users Group of Grand Rapids, Robert M. 
Worth. Jr., 1726 Millbank S.E., Grand Rapids. 
49508(616) 245-9324 

Greater Kalamazoo Color Computer Club, Jim Rix. 

1835 Chevy Chase Blvd., Kalamazoo, 49008, 

(616) 344-7631 
Greater Lansing Color Computer Users Group, P.O. 

Box 14114, Lansing, 48901 
Michiana CoCo Club. Clay Howe, 310 S. Jefferson 

St., Sturgis, 49091, (616) 651-4248 
MISSISSIPPI 

Singing River C.C. Club, Mark Welch, 3605 Van- 
cleave Rd. , » 1 1 8, Gautier, 39553, BBS (601 ) 875- 

8688 
Gulf Coast Color Computer Assoc, Ed Keels, 22 

Christy Cove. Gulfport, 39503, (601) 832-1210 
Jackson Color Computer Club, Dorothy N. Welch, 

424 Church Street. Madison, 39110, (601) 856- 

7255 

CoCo Art Club, Joel Bunyard, Rt. 16, Box 11, 
Meridian, 39301, (601 ) 483-0424 

MISSOURI 

North County 80 Group, Tom Vogel, 12 Ville Donna 
Ct., Hazelwood, 63042, (314) 739-4078 
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NEW 

DISK 
DRIVES 



New Low Price! 



"Hifi 



STARTING AT 

$ 89, 



95 






TANDON MPI TEAC 



s 

Double Sidea 
Double Density 

40 or 80 Tracks 



1/2 Hght.Teac/Panasonic 



WITH CASE & 
POWER SUPPLY 

$129.95 



CALL FOR 

SALE 

PRICES 



Speed 6 ms Ik lo Ik and up 
Capacity 250k unformalted 
Tracks 40 

Warranty now 1 YEAR 
We carry only the finest quality disk drives -no seconds • no surplus 

SATISFACTION GUARANTEED!! all drives fully tested&warranteed 

Complete Disk Drive with Power Supply&Case t??c $129.95 

Two Drives in Dual Cases Power Supply t??? J2-7-&95 CALL 

1/2 ht double sided double density Disk Drives .(Panasonic/Teac)3> $119-95 

1/2 ht double sided double density Disk Drive with ps&case ^99:95 CALL 

low to use your new drive system on audio cassette 

Single ps&case $44.95 Dual 1/2 ht ps& case $54.95 Dual ps&case. Call 

Color Computer Controller fJ&Ml ^pj^HP $129.95 

DRIVE 0FQR RADIO SHACK COLOR COMPUTER 

TANDON, MPI OR TEAC DRIVE (SINGLE SIDED 40 TRACKS SPEED 5 MS TRK TO TRK & UP) 
POWER SUPPLY and CASE, TWO DRIVE CABLE WITH ALL GOLD CONNECTORS . 

^ J&M CONTROLLER, MANUAL and DOCUMENTATION $.249^)5 £> oALfc. 

^%-DRI VE FO R R ADIO SHACK CQLQR COMPUTER 

W ^ PANASONIC 1/2 HEIGHT DOUBLE SIDED DOUBLE DENSITY DRIVE 500K unformalted yV 

*° gV .v> POWER SUPPLYand CASE, 2 DRIVE CABLE WITH ALL GOLD CONNECTORS ^QAI CI 

J&M CONTROLLER. MANUAL and DOCUMENTATION $27&§5~, * ,, OALb! 

TAKE ADDED SAVINGS ON TWO DRIVE SYSTEMS M w^* ioD,s»ei.« 

DISKETTES with free library case B^jHl " ' ' ■ ■'■'• $1795 

Unadvertised Specials | ■ H $Cal I 

Drives cleaned, aligned & tested * ■ ™. $29.95 

TECHNICAL STAFF ON DUTY, PLEASE CALL FOR ASSISTANCE. 




MS 

CALL US TODAY!! 
^® ORDER TOLL FREE 




617 278 6555 * DEALER inquiries invited. 

1-800-635-0300 617-2786555 

TRUE DATA PR OD UCTS 

9 SOUTH MAIN ST 
UXBRIDGE, MASS. 01569 
617-278-6555 



We welcome 
Visa/Master Charge S 



HOURS MON SAT 9-6 (EST) 



• Checks(allow 2 weeks for clearing) 

• COD. Add $2.00 



New Hard Drives 



COMPLETE SYSTEM 



JUST PLUG IN 



IBM XT 
COMPATIBLE 



Call For 
BEST PRICE 







Warranty - One Full Year 



call for low price 



5 to 20 Megabyte, ready to run on the TRS 
80 Model I/III/IV/4P, color computer, 

SCREEN DUMP PROGRAM 

64K UP VJlKAUtO §19. 95 The best screen dump program for the Epson& Gemini 



VIDEO DRIVER 

ENABLES YOUR COCO TO OPERATE WITH A 
VIDEO MONITOR INSTEAD OE A TELEVISION! 



$24.95 



Panasonic 1091 Printer 239.95 

1091 PrinterS SP3 & Screen Dump 299-95 



printers ever!! Have the option of standard images 
reverse w regular or double sized pictures s 1 Q 95 

sp-3 interface for Color Computer 

■ 300-19,200 BAUD rates 

■ External to printer — No AC Plugs 

■ Built in modem/printer switch — no need for 
Y-cables or plugging/unplugging cables 



PRINTER CABLES AND 
INTERFACES AVAILABLE 
Call for current pricing 




Only: 
$54.95 




'*-„ 



COMPLETE SYSTEM 




«$ 



a*. 



&* 



now 
with 
screen 
dump 



Nothing more to buy! 

Dealer inquiries invited 




TRU E DATA PROD UCTS 

9 SOUTH MAIN ST. 
UXBRIDGE, MASS. 01569 



CALL US TODAY!! 
B ORDER TOLL FREE 



617-278-6555 

1-800-635-0300 



Mid-America Color Computer User's Group, Jerry 

Morgon, 807 Ponca Drive. Independence. 

64056. (816) 796-5813 
Coconuts. 1610 N. Marian, Springfield, 65803 
NEBRASKA 
Siouxland Color Computer Club. Alan Pedersen, 

61 1 D Street. South Sioux City, 68776, (402) 494- 

2284 

NEVADA 

CAT. F.U.N. , Paul A. Osborne, 201 Miners Road, 
Fallon. 89406. (702) 423-5789 

NEW JERSEY 

West Orange CoCo Club, Gregg Favalora, 12 
Blackburne Terrace, W. Orange. 07052, (201) 
736-1748 (let ring 12 times) 

Loco CoCo Club, Bud Lavin, 73B Wavercrest Ave., 
Winfield Park, 07036 

Mercer County Color Computer Users Group, 
Richard C. Kelly, 1904 Country Lane, W. Tren- 
ton, 08628, (609) 883-9270 

NEW MEXICO 

Chaves County Color Computer Club, Harry Ma- 
chen, 18 Forest Drive. Roswell, 88201 

NEW YORK 

Adirondack CoCo Club (Albany Chapter), Ron Fish, 
Box 4125, Albany, 12204. (518) 465-9793 

Adirondack CoCo Club, (Greene County Chapter), 

Pete Chast, P.O. Box 61, Athens, 12015, (518) 

945-1636 
Adirondack CoCo Club (Glens Falls Chapter), 

Richard Mitchell, 39 Center St., Fort Edwards. 

12828 

Island Color Computer Club, Joseph Castelli, P.O. 

Box 901, Bellmore, 11710, BBS (516) 783-7506 
Kings Byte CoCo Club, Morty Libowitz, 1063 East 

84th St.. Brooklyn. 11236, (718) 763-4233, BBS 

(718) 837-2881 

C.C. Club of Central N.Y., Joseph Short, 248 S. 
Fourth Ave., Ilion. 13357, (315) 895-7730 

Rockland County Color Computer Users Group, 
Harold L. Laroff. P.O. Box 131, Monsey, 10952- 
0131. (914)425-2274 

Olean Area CoCo Users Group, Herman L. Smith, 

P.O. Box 216, Olean, 14760, (716) 933-7488, 

BBS (716) 933-7489 
The Rochester S-80 Computer Club, Inc., Gary 

Panepinto, P.O. Box 15476, Rochester, 14615, 

(716)392-6133 

New York Color Computer User Group, Carl Glo- 
vinsky, 15 Bolivar St., Staten Island, 10314,(718) 
761-0268 

NORTH CAROLINA 

Bull City CoCo Users Group, Todd Wall, 5319 
Durand Drive, Durham, 27703, (919) 598-1348 

Raleigh Color Computer Club. David Roper, P.O. 
Box 680, Garner, 27529 

OHIO 

Central Ohio Color Computer Club, Jim Upperman, 

5201 Wilcox Road, Amlin, 43002, (614) 876-1767 
Color Computer Club, Inc.. William Wills, P.O. Box 

468, Canfield. 44406 
Dayton Color Computer Users Group, Steven E. 

Lewis, 4230 Cordell Dr., Dayton, 45439, (513) 

299-3060 

Dayton Area Color Computer Users Group. David 

R. Barr, 2278 Yorkshire PI.. Kettering, 45419, 

(513)293-2228 
Greater Toledo Color Computer Club, William Paul 

Saba Sr., 3423 Cragmoor Ave.. Toledo, 43614, 

(419) 385-9004 

Tri-County Computer Users Group, William J. 
Loeffler, 2612 Dale Avenue, Rocky River, 44116, 
(216) 356-0779 

Miami Valley CoCo Club, Tim Ellis, 1805 W. Park- 
way Dr., Piqua, 45356, (513) 773-2244 

OKLAHOMA 

Central Oklahoma Computer Organization, Inc., 
Martin Schiel, 5313 Spitz Drive, Oklahoma City. 
73135. (405) 670-6891 



Green Country Computer Association, Michael 
Keller, P.O. Box 2431, Tulsa, 74101, (918) 245- 
3456 (DATA) 

PENNSYLVANIA 

SNUG-Phila.. William K. Serody, 1181 Cumberland 
Road, Abington, 19001, (215) 887-0513 

HUG-A-CoCo, George Lurie, 2012 Mill Plain Court, 
Harrisburg, 17110, (717) 657-2789 

Penn-Jersey Color Computer Club, P.O. Box 2742, 
Lehigh Valley. 18001 

Williamsport Area Color Computer Club, John M. 
Rymell, R.D. 3, Box 182. Muney, 17756, (717) 
546-2721 

The CoCo Exchange Club, Daniel Moore, 617 
Prescott Avenue. Scranton, 18510, (717) 961- 
0535 

Skyline Color Computer Club of Berks County, 

Lewis F. Brubaker, 4874 Eighth Ave., Temple. 

19560. (215) 921-3616 
Pittsburgh Color Group, Ralph Marting, P.O. Box 

351. West Mifflin. 15122, (412) 823-7607 
RHODE ISLAND 
New England COCONUTS, P.O. Box 28106. North 

Station. Providence. 02908 

SOUTH CAROLINA 

LoCo CoCo Club, Larry Coyle, 4334 Flynn Dr., 
Charleston, 29405, (803) 747-0802 

MidlandsSOComputerClub, Frank Eargle, P.O. Box 
7594. Columbia. 29202, TBBS (803) 791-7389 

Spartanburg County CoCo Club, Lawrence Easier, 
Jr., Rt. 1 Highway 221, Spartanburg, 29302, 
(803)578-3120 

TENNESSEE 

Tri-Cities Computer Club, Gary Collins, P.O. Box 

4506 CRS, Johnson City, 37602-4506, (615) 929- 

1862 
Foothills Micro-Computer Club, Aaron Sentell, P.O. 

Box 1541. Maryville. 37801. (615) 982-4629 
TEXAS 
Alamo Color Computer Club, P.O. Box 690256. San 

Antonio, 78269 

UTAH 

Salt City CoCo Club, Dennis Mott, 720 E. Browning 

Ave., Salt Lake City, 84105, (801 ) 487-6032, BBS 

(801)487-6787 

VIRGINIA 

Northern Virginia C.C. Club, Bruce Warner, 14503 
Fullerton Rd.. Dale City, 22193, (703) 690-2453 

Central Virginia Color Computer Club, Roger Lee, 
Rt. 2 Box 175, Madison Heights, 24572 

Color Company, Rick Blouin, 12007-C3 Greywing 
Sq., Reston, 22091, (703) 860-9297 

Richmond Area Color Computer Organization, 
William Mays, 6003 Westbourne Drive, Rich- 
mond, 23230, (804) 282-7778 

WASHINGTON 

Northwest Computer Club, Larry Haines, East 2924 
Liberty, Spokane, 99207, (509) 483-5547 

Mount Rainier Color Computer Club, Ron Amos, 
2450 Lenore Drive N„ Tacoma, 98406, (206) 752- 
8735 

WEST VIRGINIA 

Mil-O-Bar Computer Club, Jim LeMaster, P.O. Box 
130, Ona, 25545, (304) 743-4752 after 4 p.m. 

Blennerhassett CoCo Club. David Greathouse, 
1306 Wells Circle, Parkersburg. 26101 

WISCONSIN 

Southern Wisconsin CoCo Club, David C. Buehn, 
24607 67th Street, Salem, 53168, (414) 843-3830 

CANADA 

ALBERTA 

Bonnyville User Group (BUG'S), Doug MacDonald, 
Box 2071, Bonnyville, T0A 0L0, (403) 826-4790 

The Calgary Color Computer Club, P.O. Box 22, 
Station M, Calgary, T2P 2G5 

Edmonton CoCo Users Group, Dexter Dombro. 
P.O. Box 4507 Stn. South, Edmonton, T6E 4T7, 
(403) 439-5245 



BRITISH COLUMBIA 

Vancouver Colour Computer Club, Box 76734, Stn 
S, Vancouver, V5R 5S7 

Salmon Arm CoCo, David Coldwell, RR #4, Site 26 
Comp. 13. Salmon Arm, V1 E 4M4 

MANITOBA 

Winnipeg Micro-80 Users Group, Robert Black. 
1 755 King Edward St., Winnipeg, R2R 0M3, (204) 
633-7196 

NEW BRUNSWICK 

Campbellton 6809E Users Group, Blaine Arsenault, 

80 Deny Street, Atholville, E0K 1A0, (506) 753- 

4769 
Moncton Color Computer Users Group, Robert E. 

McLaughlin, 73 Lewis Street, Moncton, E1C 

4S5, (506) 855-3860 

NOVA SCOTIA 

Color Trading Post, Lee A. Sutton, P.O. Box 565. 
Bridgetown, BOS 1C0 

Halifax Dartmouth CoCo Users Group. Eugene 
Naugler, P.O. Box 572, Dartmouth, B2Y 3Y9 

Colour Computer Halifax User Group (CoCo Hug), 
Paul A. Power, 6354 London St., Halifax, B3L 
1X3, (902)455-6341 

ONTARIO 

ESSA Color Computer Club, David Morrow, 10 
Berwick Cres., Angus. L0M 1B0, (705) 424-6985 

Kingston CoCo Club, Kenneth Bracey, 316 West- 
dale Ave., Apt. 4-C, Kingston. K7L 4S7, (613) 
544-2806 

K-W CoCo Club, P.O. Box 1291. Station C. Kitch- 
ener, N2G 4G8 

London CoCo Nuts Computer Club, Harry K. 

Boyce. 180 Concord Road, London, N6G 3H8, 

(519) 472-7706 
Niagara Regional CoCo Club, Gerry Chamberland, 

6843 Cumberland Crt., Niagara Falls, L2H 2J9, 

(416) 357-3462 

Ottawa 6809 Users Group, Norm Shoihet, 1497 
Meadowbrook Road, Ottawa, K1B 5J9, (613) 
741-1763 

Sarnia Computer Users Group, J. Verdon, P.O. Box 
1082, Sarnia, N7T 7K5, (519) 344-6985 

QUEBEC 

Club d'Ordinateur Couleur du Quebec, Inc.. Centre 
de Loisirs St-Mathieu. 7110- 8e Ave., St-Michel, 
Montreal, H2A3C4, (514) 729-8467 

Club Micro Ordinateurde Montreal-Nord, Christian 
Champagne, 12365 Blv. Langelier#7, Montreal- 
Nord, H1G 5X6, (514) 323-5958 

Les CoCophiles, Robert Chartrand, 17 Bord-de- 
I'eau, Repentieny, J6A 3K2, (514) 581-1385 

Club ORCO-RS, Jacques Bedard, 33 Lisiere, St- 
Constant. J0L 1X0, (514) 632-4311 

Le Club Couleur du Nord, Gabriel Pigeon, C.P. 315, 
Barraute, JOY 1A0, (819) 734-2577 

SASKATCHEWAN 

Saskatoon Color Computer Club, L. Curtis Boyle, 
35 Bence Crescent, Saskatoon, S7L 4H9, (306) 
382-1459, BBS (306) 384-8040 



FOREIGN 

ARGENTINA 

Freecoco Club. Novoa. Miguel Angel-lng. Duarte, 
Omar, Mendez de Andes 799, Buenos Aires, 
Capital Federal 1405, phone 431 -2501 

AUSTRALIA 

Blacktown City TRS-80 Colour Computer Users 
Group, Keith Gallagher. P.O. Box 264, River- 
stone, New South Wales, 2765, (02) 627-4624 

COCOPUG, Harry Murphy, 8 Lois Court, Regents- 
ville, New South Wales, 2750 

CoCoHUG (Color Computer Hobart Users Group). 
Robert Delbourgo, 15 Willowdene Avenue, 
Sandy Bay, Hobart. Tasmania, 7005 

Sunshine Color Computer Club, Stephen Jones, 
P.O. Box 111, Sunshine. Victoria. 3020 
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The Best Money Can Buy . . . 
HDS Floppy Drive Controller Board 




Reduce your I/O errors with the Hard Drive Specialist 
Floppy Drive Controller for the Color Computer. Gold edge 
card connectors, advanced design, and the absence of 
potentiometers make it the best available. Our newest ver- 
sion controller allows the use of either (two 24 pin ROMS), 
or (one 24 pin and one 28 pin ROM). Using this board 
with the standard Radio Shack ROM gives you 100% com- 
patibility with all Radio Shack software. 
Completed and Tested Board 

with Radio Shack ROM $99. 

(Includes Case, and DOS Instructions) 

Completed and Tested Board without ROM . . . $79. 

(Includes Case) 

Bare Board with Instruction manual $30. 

Parts Kit For Bare Board without ROM $30. 

Radio Shack ROM (current version) $20. 

Radio Shack ROM 1.0 $40. 



Ordering Information 

Use our WATS line 10 place /our order via Visa, MasterCard, or Wire TrBnsler Or 
mail your payment directly to us Any non-cemlled tunds will be held until proper 
clearance is mado COO orders are accepted as well as purchase orders Irom 
government agencies Most items ate shipped otl the shelf wiih the oxception ol hard 
drive products that are custom built UPS ground is our standard means ol shipping 
unless otherwise specified Shipping costs are available upon requost 



Drive SS/DD $150. 

WHILE SUPPLY LASTS! 

Drive Complete w $199. 

Drive 1 Complete $129. 

Drive & 1 Dual Drive $319. 



HARD DRIVE SPECIALIST 



1-713-480-6000 
Order Line 1-800-231-6671 
16208 Hickory Knoll 
Houston, Texas 77059 



Australian Christian Users Group, Lieutenant 
Raymond L. Isaac, 57 Wittenoom Street, Collie, 
Western Australia 6225, phone (097) 34-1578 

ISRAEL 

The Mid-East CoCo Club, J. Yosef Krinsky, 52/20 
Ramot Polin, Jerusalem, Israel, Phone (972) 02- 
863-354 

MEXICO 

Mexcoco Users Group, Sergio Waisser, Paseo de la 
Soledad #120, Mexico City, D.F.. 53920, phone 
294-36-63 

First Color Computer Users Group of Hermoslllo. 
Arturo Fernandez Diaz-Gonzalez, Javier de 
Leon No. 708, Colonia Pitic, Hermosillo, Sonora, 
phone 4-75-78 

the NETHERLANDS 

Color Computer Club Benelux, Jorgen te Gitlel, 
Eikenlaan 1. 4641 GB Ossendrecht, the Nether- 
lands 

PERU 

Piura Color Computer Club, Carlos Alvarez, Box 
142, AV. Guillermo Irazola, J-6 URB. Miraflores 
Castilla, Piura, Peru, phone (074) 327182 

PUERTO RICO 

Puerto Rico Color Computer Users Club, P.A. 
Torres, Cuernavaca 1699, Venus Gardens, Rio 
Piedras, Puerto Rico 00926, Phone (137) 755- 
7598 

WEST GERMANY 

First CoCo Club Hamburg, Theis Klauberg, 2345 
Delaware Drive, Ann Arbor, Ml 48103 (tempor- 
ary address). 

The Greatest German CoCoCooks, Michael 
Herbes. Dortstr 23, 4320 Hattinger, West Ger- 
many 



new clubs 



• The newly formed Southeast Connecticut 
CoCo Users Group meets the third Monday 
of every month. For information contact me 
at (203) 448-1388 or the CoConut Manor 
BBS at (203) 449-1792, 24 hours a day, 7 
days a week. Leave a message for SailorBill. 

Bill Gross 
30 Sycamore Lane 
Groion, CT 06340 



• The Brandon Color Computer Club 
meets the second Friday of every month, 7- 
9 p.m., Room 600, Immanuel Lutheran 
Church, 2913 S. John Moore Road, Bran- 
don. For more information contact Rich 
Steinbrueck at the church office. 

Brandon CoCo Club 

2913 S. John Moore Road 

Brandon. FL335I1 



• The CoCo Nuts of Central Florida meets 

on the first Wednesday of every month at 

7:30 p.m. If interested, write me or call (305) 

855-7867. ~ , , — ,, , 

ueorge M. tltenburg 

5455 Hansel Avenue (L-7) 

Edgewood, FL 32809 



• Announcing the Central Illinois CoCo 
Club. We meet the first Sunday of each 
month in the conference room at the Bank 
of Pontiac, in Pontiac from 7-10 p.m. 

Tom Golladay 

406 North Clay Street 

Fairhury. I L 61739 



• I would like to announce the forming of 
the Kids Only CoConut Club. The purpose 
of the club is to exchange hints about games, 
POKES and PEEKS, programming tips and 
public domain software. Anybody under the 
age of 16 is invited to join. The fee is $1 a 
year. Write to me for information. 

Konnie Siewierski 

1010 N. Plum Grove Road. Apt. 202 

Schaumhurg, IL 60173 



• The Hutchinson Color Computer Club 
meets at the Taco Hut, 600 East 30th, 
Hutchinson. Call (316) 662-0718 for infor- 
mation. . , 

James Jones 

612 I die wild 
Hutchinson, KS 



• CCOG would like to invite CoCo users or 
would-be users to join us. We meet on the 
third Tuesday of each month from 7-10 p.m. 
at DSL Computer Products, Inc., 4950 
Schaefer, Dearborn. We generally have 
some presentation and much informal 
exchange of information. Anyone interested 
can call me evenings at (313) 334-3934. 

Charles S. Van Ark 
Bloomfield Hill. MI 



• The Hollidaysburg Area Color Computer 
Club will be having meetings at the Holli- 
daysburg Public Library every other Tues- 
day from 5:30 to 7:30 p.m. For information 
call (814) 695-3522 or write to me. 

Shawn Serine 

RD 1. Box 77 

Hollidaysburg. PA 16648 

• I would like to announce the birth of the 
newest Color Computer club — The CoCo 
Exchange Club. The club offers a monthly 
newsletter, reviews, useful programs and 
hints. Write for more information. 

Daniel Moore 
617 Prescott Avenue 
Scranton. PA 18510 

• Announcing the Memphis Color 
Computer Users Group. For information 
call (901) 685-0009 or write me. 

The Computer Center 

c/o Logan Ward 

5512 Poplar Avenue 

Memphis. TN 38119 



• 1 wish to announce the reorganization of 

the San Antonio CoCo Club. The new name 

is the Alamo CoCo Club and meets monthly 

with membership open to anyone. For 

additional information, call me at (512) 699- 

6027 or write. .. „ 

Harvey Dapeer 

P.O. Box 690256 

San Antonio. TX 78269 

• Announcing a club for MC-10 users. The 
MC-10 International Users Group meets on 
a regular basis and has a newsletter. For 
more information write to us. 

Larry Haines 

East 2924 Liberty 

Spokane. WA 99207 

• I am starting a club called Discover 80. 
We trade public domain software and PEEKS 
and POKES. If interested, write me. 

Derek Schooley 

73 Keeneland Drive 

Huntington. WV 25705 

• We would like to inform your readers of 
the presence of a Milwaukee based comput- 
er group. The CoCo-Mug (Color Computer- 
Milwaukee Users Group) is a club solely for 
the enjoyment and enhancement of the 
Tandy Color Computer. Meetings are on the 
first Monday of every month. For more 

information, contact me. , , ,. 

John Davis 

4105 N. 79 Street 

Milwaukee. W 1 53222 

• C'mon, CoCoists, the Poor Man's CoCo 
Club needs members. If you want to get the 
most out of your CoCo, please write or call 
me at (608) 562-3260. Marc Andreessen 

Rt.2, Box 103 W 
New Lisbon. WI 53950 



• 1 would like to announce the formation 
of a new club called The Master Key Mu- 
tants. A club for all CoCo users. We feature 
a monthly newsletter that contains reviews 
of the newest CoCo software, hardware 
ideas, and a soon-to-be bulletin board. To 
join, write me or call (403) 276-2726. 

Jim Kung 

132-43 Avenue N.W. 

Calgary, Alberta 

Canada T2K 0H6 



• The CoCoKnights Color Computer Club 
is now about to enter its third year. The 
members are all RAINBOW addicts. For 
further information please write. The BBS 
numbers are Rain Board 382-9080, nightly 
8-1 1 p.m. (CoCo system) or Com Line, 727- 
0352, (Tandy 1000 system). A 0oievaar 

221 Edward Str. 

Victoria, British Columbia 

Canada V9A 3E4 
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• I am pleased to announce the formation 
of a new CoCo club — Moncton Color 
Computer User's Group. The club is open 
to world wide membership. These members 
will be known as associate members and will 
receive the club newsletter and membership 
cards. The membership fee of $8 is to cover 
the cost of postage and handling. All inquir- 
ies are to be mailed to me. 

Robert McLaughlin 

73 Lewis Street 

Moncton, New Brunswick 

Canada El C4S5 

• The Trafasas Computer Club has recently 

changed its address to: CoCo Co-op, Box 

565, Bridgetown, Nova Scotia, BOS ICO. We 

trade public domain software and publish a 

monthly newsletter that reviews programs 

and also has contests, etc. , „ ,, 

Lee Sutton 

Box 565 

Bridgetown, Nova Scotia 

Canada BOS ICO 

• The Essa Color Computer Club meets at 
Saint Mary's School in Barrie twice monthly 
on Monday nights. For more information, 



call Eldon Doucet at (705) 424- 1 354 or Dave 

at (705) 424-6985. Dave Morrow 

10 Berwick Cres., Box 844 

Angus, Ontario 

Canada LOM 1 BO 

• Announcing a new computer club in 

Stirling. We will be meeting in the village 

council chambers on the second Thursday of 

each month. For more information call (613) 

395-2320 or write me. , „ n 

James R. Dean 

RRH3 

Stirling, Ontario 

Canada KOK 3 E0 



• The Burlington Color Computer Users 
Group holds monthly meetings on the 
second Tuesday of the month between 
September and June. Meetings are held in 
the cafeteria of Burlington Central High 
School in Burlington. Visitors are welcome. 
The club serves members from Ancaster, 
Dundas, Hamilton and Oakville. We publish 
a newsletter to keep our members up to date 
on club events as well as programming tips, 



and the latest information for the CoCo 
community. We have a good selection of 
programs available in the club library. Dues 
are $30 per year which are used to keep our 
hardware/ software library up to date and to 
publish the newsletter. ^^ Qoffey 

33 Drakes Drive 

Stoney Creek, Ontario 

Canada L8E4G4 



• The First Color Computer Club of Israel 
has changed its name and location. We are 
now The Mid-East CoCo Club serving the 
entire Mid-East region with our ever grow- 
ing library of public domain software. For 
membership information call (972) 02-863- 
354 (local time 8-11 p.m., Sunday through 
Thursday) or write to me. 

J. Yosef Krinsky 
50/52 Ramot Poli'n 

Jerusalem, Israel 
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THE RAINBOW'S 

"One-Liner Contest 

now been expanded 

to include programs of 

either one or two lines. This 

means a new dimension and new 

opportunity for those who have "really 

neat" programs that simply just won't fit in 

one line. 

Here are the guidelines: The program must 
work in Extended basic, have only one or two 
line numbers and be entirely self-contained — 
no loading other programs, no calling ROM 
routines, no poked-in machine language code. 
The program has to run when typed in directly 
(since that's how our readers will use it). Make 
sure your line, or lines, aren't packed so tightly 
that the program won't list completely. Finally, 
any instructions needed should 
be very short. 

Send your entry 
(preferably on cassette) to: 




ADOS 



ENHANCED, EPROM-ABLE 
DISK BASIC 



Now you can •.upt'ichargc Basic <v<lh an impressive anay o' eitra features 
WITHOUT saenhemg compatibility' ADOS is compatible with virtually lOO^s o' 
comrr.eioai aollwaro Customizing utilities arc provided lo allow user-detmed 
command abbieviahons. baud rate, step rale Hacks per disk (35 or 401. support ol 
daub* Sided drives, aid more Alter customizing ADOS, you can have il burned into 
an EPHOM thai plugs into ihe Disk Baste ROM socket, or |ust use il in PAM as a 64K 
disk utility tEPROM • burning will cosl about S20-we provide inlormation 
concerning now you can have Ihis done ) Features >r>c udc ■ repeat and ed>( ot the 
'as' direct-mode command • 26 definable control key abbreviations • automatic line 
number prompts • DOS command • lowercase command entry la line complement to 
a Loworkil ■»( PBJ WordPak) • COPY iliienamei to (drive number) • AE error override 
oplioi • RAM command l64Ki • RUNM command • te»t echoing to printer • ML 
monitor • ie*t tile scan • ennanccd directory • error napping • hires teat utiiily 
included (42 5l or 64 characters per nnei 

"I COULD NOT FIND ANY SOFTWARE THAT WOULD NOT RUN UNDER ADOS." 

THE RAINBOW. December 1964 
"/ LOVE ADOSI . A GENUINELY FIRST RATE PRODUCT." 

Color Micro Journal. February 1985 
I WONT PART WITH MY ADOS EPROM FOR ANYTHING.. NO COMPATIBILITY 
PROBLEMS." 

HotCoCo.Mny 1985 
Disk 12? 95 



THE PEEPER 



ML PROGRAM TRACER 



Monitor machine language programs AS THEY ARE RUNNING* Peepoi actually 
timeshares with the target program giving FULL CONTROL as ML programs run 
Switch instantly between watching regular program output and Peeper s trace ot 
registers and stack on screen or printer inspect memory m any ot 26 display modes 
Execution speed can oe varied irom lull speed lo ihe barest crawl, or halted entirely. 
as programs run Single stopping bioakpoints. memory or register examine/change 
Relocatable supports 64K use H6K lequircdi Seo February '65 review 
Olsk S23.95 Assamblnr source listing Add 3.00 

NEW FOR COC03 

CUSTOM CABLE FOR MAGNAVOX RGB MONITORS 

The Mngnavox 8CM515 and 8CM505 monitors, containing RGBA. RGBI. and audio 
inputs, sell at prices comparable to Tandy's CM-8, and represent a lar bettor buy 
lor CoCo 3 users Composile input, which CM-8 lacks, is required for seeing PMOOE 
4 displays in color RGBi allows ihe Magnavox. unlike the CM-B. lo bo used wiih 
PC-Compatibles — a big resalo consideration p t , Cable 19.95 



SPECTROSYSTEMS, 



No delay or personal checks I 

Please add $200 shipping Sorry no credil cards or CODs 



11111 N Kendall Drive. 
Suite A 108 
Miami, Florida 33176 
(305) 274-3899 'Jayu' 
Eve 



April 1987 THE RAINBOW 155 



COCO 3 CAPABILITIES 




CoCo 3 
RGB monitor 




The 

Write 
Stuff 

By Bill Cook 


r~% ecently I purchased a CoCo 3, and not owning a 

■■^F word processor that can take advantage of the new 

JL. m.text screens and colors, I decided to write one. It's 

rather simple, yet sophisticated enough for most uses. I call 

the program Write III. 

The program needs practically no user documentation. 
It is fully menu-driven and prompts the user through the 
major steps required. When selecting a line to edit, the text 
color changes to highlight that line. You may then move the 
cursor left or right with the arrow keys. To delete a 
character, position the cursor under the character you want 
[o delete and press SHIFT and the left arrow. To open up 
space within a line for inserting a character or word, 
position the cursor where you want the text to break and 
press SHIFT and the right arrow. Change characters in this 
node by simply typing over the old text. To exit the line 
editing mode press ENTER. 

During normal text entering, you can move the cursor 
right or left with auto-repeal by pressing SHIFT and the 
appropriate arrow key. 

From the menu, simply select the appropriate option for 
starting a new document, loading in a file, saving a file, 
viewing the directory, killing files from the disk, or printing 
a document. 

All printing has the following defaults: 

Left margin=10 
Right margin=IO 
Printed lines per page=55 
Single spacing 

These values and a few more can be changed by embed- 
ding printer commands into your document. Embedding 
commands is simple. A semicolon (;) as the first character 
in a line tells the program that printer commands are to 
follow. Here's a sample command line: 

;LM=S RM=G SP=2 BF=1 

This line sets the left margin at six spaces from the left 
of the page, the right margin at six spaces from the right 
of the page, single spacing and boldface (emphasized) 
printing. The command line is an unprinted line, so be sure 
not to mix text or other information with this line. The main 
rule to remember is that the semicolon must be the first 
character of the line. 

Another helpful command is ;N on a line by itself. This 
command forces a new page. 

Readers with programming experience will find it fairly 
easy to add their own customized printer commands. I have 
added REM statements to show where printer commands 
are located. Underlining, for instance, would be a nice 
additon! 

Other than the few rules noted above, there is nothing 
else to remember. It's almost too easy. Try it, I think you 
will like it. Remember, a CoCo 3, disk drive and RGB 
monitor are required. The boldface printer codes are for 
Epson printers. □ 
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The listing: 3 WRITER 

'WRITE III - COCO III WORD PRO 
CESSOR (C) 1986 BY BILL COOK 11/ 
19/86 

1 PCLEAR1:CLEAR12000:DIML$(200) 

5 POKE&HFFD9,0:ON BRK GOTO 9000 : 

ON ERR GOTO 10000 

1/3 CR=80:FG=3:BG=1:WIDTHCR:PALET 

TE RGB '.PALETTE 1,0: CLS 2:ATTR7,1 

: XL=200 : F0RX=1T04 : X (X) =X+340 : NEX 

T:XX=247 

11 PR$=STRING$(CR,"-") : BL$=STRIN 
G$(CR-1,32) :DF$=" :0" : DF=0 

12 DATAStart New File, Load Old F 
ile,Save Current File,Edit/Revie 
w File, Print Current File, Resume 

Document, Kill File, View Directo 
ry,Exit to BASIC 

13 F0RI=1T09 : READM$ ( I ) : NEXT : GOTO 

iM 

16 GOSUB3 3:IFH=CR-4THEN28 

17 A$=INKEY$:IFA$=""THEN17 

18 A=ASC(A$) : RETURN 

19 AN$="" 

20 GOSUB16:IFA=13THEN2 5ELSEIFA=3 
4THEN20ELSEIFA=21THEN50ELSEIFA=9 
3THEN54ELSEIFA=95THEN20ELSEIFA=9 
1THEN20 

21 IFA=12THENL$(N)=AN$: RETURN 

22 IFA<>8THENAN$=AN$+A$ : PRINTA$ ; 
:GOTO20 

23 IFLEN(AN$)=0THEN19ELSEAN$=LEF 
T$(AN$,LEN(AN$)-1) : PRINTCHR$ (8 ) ; 
:GOTO20 

25 IFA=13THENL$(N)=AN$+CHR$(12 6) 
:N=N+l:IF N=>XL THEN80 

2 6 PRINTCHR$(12 6) : AN$=" " : GOSUB3 3 
:GOTO20 

28 IFMID$(AN$,H,1)<>" "THENH-H-1 
:G0T028 

29 L$(N)=LEFT$(AN$,H) :LOCATEH,V: 
PRINTSTRING$ ( CR-2 -H ,32): N=N+1 : IF 

N=>XL THEN80 

30 AN$=MID$(AN$,H+1) :PRINTAN$;:G 
OSUB3 3 

31 GOTO20 

3 3 HSTATX$,X,H,V: RETURN 
3 7 LOCATEH,V: RETURN 

39 ZZ=INT(CR/2)-INT(LEN(Z$)/2) :L 



OCATE ZZ,V:ATTR7, 1 : PRINTZ$ : ATTR3 

, 1 : RETURN 

46 RP=0:FORX=1TO4:IFPEEK(X(X) ) =X 

X THENRP=l:POKEX(X) , 2 55 : NEXT: ELS 

ENEXT 

48 RETURN 

50 GOSUB4 6:IFRP=1ANDLEN(AN$)>0TH 

ENAN$=LEFT$(AN$,LEN(AN$)-1) : PRIN 

TCHR$(8) ; :H=H+(H-1>-1) :LOCATEH,V 

:GOTO50 ELSE20 

54 GOSUB4 6 : IFRP=1ANDLEN ( AN$ ) <7 6T 

HENAN$=AN$+" ": PRINT" " ;:H=H-(H+ 

KCR-4) :LOCATEH,V:GOT054 ELSE20 

70 IFF$= IIM THEN1^ 

71 IFINSTR(l,F$,"/")=j3 AND INSTR 
( 1 , F$ , " . " ) =j8 THENF$=F$+" . DAT" 

72 OPEN ,, D",l,F$,l:LO=LOF(l) :IFLO 
=j3 THENPRINT: PRINT "File not foun 
d . " : CLOSE : KILLF$ : FORTD=lTO10p/3 : N 
EXT :UN=1: RETURN ELSE CLOSE : RETUR 
N 

1J30 CLS : H=p : V=j3 : LOCATEH, V: Z$="Wr 

ite III CoCo III Word Proces 

sor":GOSUB39:V=V+l:Z$="By Bill C 
ook" : G0SUB3 9 : PRINTPR$ ; : ATTR3 , 1 
110 F0RI=1T09 : LOCATECR/2-12 , 1+5 : 
PRINTI ; CHR$ ( 8 ) ; " . " ; M$ ( I ) : NEXT 

115 LOCATECR/2-12, 16 :PRINT"File 
in memory : " ;F$ 

116 LOCATECR/2-12, 17 :PRINT"No. L 
ines :";N 

117 LOCATECR/2-12 , 18 : PRINT"Space 
Remaining: " ;200-N 

120 LOCATE CR/2-16,21:ATTR 7,1,B 
:PRINT"Select the option of your 
choice ...";: ATTR FG , BG 
130 A$=INKEY$ : IFA$=" "THEN130ELSE 
A=VAL(A$) 

140 IFA<1ORA>9THENSOUND100,1:GOT 
O130ELSECLS:ON A GOTO1000 , 2000, 3 
000 , 4000 , 5000 , 6000 , 7000 , 8000 , 900 



150 SOUND100,1:GOTO140 

200 GOTO 200 

1000 'START NEW DOCUMENT 

10 10 F$=" " : H=0 : V=0 : POKE2 8 2,0: LOC 

ATEH,V:Z$=M$(1)+". .Press <CLEAR> 

for MENU":GOSUB3 9:PRINTPR$; 
1020 FORI=0TOXL:L$(I)="":NEXT:N= 
: GOSUB19 : POKE2 82 ,255: CLS : GOTO10 



1030 FORI=0TON-1 : PRINTL$ ( I ) : NEXT 

:PRINTL$(N) ; : GOSUB3 3 : FORI=NTOXL: 

L$ ( I ) =" " : NEXT : GOSUB19 : POKE2 8 2,25 

5:GOTO100 

2000 'LOAD DOCUMENT 

2005 POKE&HFFD8,0:H=0:V=0 

2010 CLS:Z$=M$(2) : GOSUB3 9 : PRINTP 



April 1987 THE RAINBOW 157 



R$; 

2020 PRINT"Enter Filename/Ext :" ; 

: LINEINPUTF$ : GOSUB70 : IFUN=1THENU 

N=0:GOTO2010 

2030 ATTR7 , 1 : PRINT : PRINT" Loading 

"+F$ : ATTR1 , 1 : AN$=" " 
2p4jZJ OPEN"I",1,F$:X=0 
2050 IF EOF(1)=-1THEN2100 
2j36^J INPUT#1,L$(X) :X=X+1 
2070 GOTO2050 
2100 CLOSE :N=X:POKE&HFFD9,0: GOTO 

3000 'SAVE DOCUMENT 

3005 POKE&HFFD8,0:H=0:V=0 

3010 CLS:Z$=M$(3) : GOSUB39 : PRINTP 

R$; 

3020 PRINT"Enter Filename/Ext:"; 

: LINEINPUTF$ : GOSUB70 

3040 ATTR7,1: PRINT: PRINT"Saving 

"+F$ 

3050 OPEN"0" , 1 , F$ : FORI=0TON : PRIN 

T#1,CHR$(34)L$(I)CHR$(34) :NEXT 

3060 CLOSE :POKE&HFFD9,0:GOTO100 

4000 'EDIT DISPLAY 

4001 Ml$=" <F>orward <B>ack 
<I>nsert line <D>elete line <E 
>dit line <M>enu ":M2$="<F>or 
ward <B>ack <I>nsert 1 
ine" :M3$="<D>elete line <E>dit 1 
ine <M>enu" 

4010 CLS:V=0:Z$=M$(4) :GOSUB39:PR 

INTPR$ ; 

4015 PP=0:SC=1:LP=18:LV=0 

4020 LOCATE0,2:POKE2 8 2,255:A$=IN 
KEY$:FORX=LP*PP TO LP*PP+LP: PRIN 
T" "+L$(X) :NEXT:V=22:LOCATE0,21: 
PRINTPR$ ; : IFCR=80THENZ$=M1$ : GOSU 
B3 9 

4021 IFCR=40 THENLOCATE0,22:PRIN 
TM2$;M3$; 

4025 IFLV>0THENH=0:V=LV:GOSUB3 7: 

GOTO4040 

4030 H=0:V=2:GOSUB3 7 

4040 A$=INKEY$:IFA$=""THEN4040 E 

LSE A=INSTR(CHR$(94)+CHR$(10)+CH 

R$(8)+CHR$(9)+"IDMEFB",A$) : ON A 

GOT04 120, 4 120, 4 120, 4 120 ,4 140, 4 15 

0,4160,4170,4180,4190 

4050 SOUND100, 1:GOTO4040 

4120 IFPEEK(341)=247 ANDV>2 THEN 

POKE341,255:V=V-l:GOSUB3 7:FORTD= 

1TO40:NEXT 

4130 IFPEEK(342)=247 AND(V<LP+2 
AND NO<N-l)THENPOKE342,255:V=V+l 
: GOSUB3 7 : FORTD=1TO40 : NEXT 

4131 IFPEEK(344)=247 ANDH<CR-3TH 
ENPOKE3 44 , 255 :H=H+1 : GOSUB37 : GOTO 
4200 

4132 IFPEEK(343)=247 ANDH>0THENP 



OKE343,2 55:H=H-1:GOSUB37:GOTO420 

ft 

4135 NO=LP*PP+V-2:GOTO4040 

4140 NO=LP*PP+V-2:IFN+1>200THENL 
OCATE0, 22:PRINT"Only 200 lines a 

llowed " : SOUND100 , 5 : F0RTD=1T 

02000 : NEXT : GOTO 100 

4141 IFN=0THENSOUND100,1:GOTO404 

4142 LOCATE0,22:PRINTTAB(10) "Mak 

ing room for insert ":F0RI1= 

N TO NO STEP-1:FORI2=0TO3:IF 12= 
1THEN414 6 

4143 I3=PEEK(VARPTR(L$(I1) )+I2) 

4144 P0KE(VARPTR(L$(I1+1) )+I2) ,1 
3 

4146 NEXT I2,I1:L$(N0)=CHR$(32) : 
N=N+1 : LV=V : GOTO4020 

4150 NO=LP*PP+V-2:IFN=0THENSOUND 
100,5:GOTO4040 

4151 LOCATE0,22:PRINTTAB(10) "Del 
eting line " :F0RI1=N0+1 TO N 

4152 FORI2=0TO3 

4153 IFI2=1 THEN4157 

4154 I3=PEEK(VARPTR(L$(I1) )+I2) 

4155 P0KE(VARPTR(L$(I1-1) )+I2) ,1 
3 

4157 NEXTI2,I1:N=N-1:LV=V:GOTO40 

20 

4160 GOTO100 

4170 NO=LP*PP+V-2 : LOCATE0, 2 2 : ATT 
R7,l: PRINT" Line Edit Mode: Press 

<ENTER> to Exit":LOCATE0,23:PRI 
NTBL$ ; : POKE2 82 , : IFN=0THENSOUND1 
00,5:GOTO4010 

4171 A$=L$(NO) :Z1$=" !#$%&'()*=1 
234567890 : -@+ ; ?/> . < , ABCDEFGHIJKL 
MNOPQRSTUVWXYZabcdef ghi j klmnopqr 
stuvwxy z " : LOCATE 1 , V : ATTR1 , 1 : PRIN 
TA$ ; : IFH=0THENH=1 : GOSUB3 7 ELSEGO 
SUB37 

4172 Z$=INKEY$:IFZ$=""THEN4172 E 
LSEIFPEEK(343)=247THENPOKE34 3,25 
5:H=H-1 ELSEIFPEEK(344)=247THENP 
OKE344,255:H=H+l 

4173 IFH<=1THENH=1 ELSEIFH>=LEN ( 
A$)+l THENH=LEN(A$)+1 

4174 IFZ$=CHR$(13)THENL0CATE1,V: 
ATTR3 , 1 : PRINTA$ ; : L$ (NO) =A$ : POKE2 
82,255: LOCATE0 , V: GOSUB3 3 : SOUND10 
0,1: LOCATE0 , 22 : IFCR=80THENPRINTM 
1$:LOCATE0,V:GOTO4040 ELSEPRINTM 
2$;M3$;:LOCATE0,V:GOTO4040 

4175 IFZ$=CHR$(21)ANDLEN(A$)>1TH 
ENGOSUB3 3 : Z$=INKEY$ : PRINTMID$ ( A$ 
,H+1) ;" "; :GOSUB37:A$=LEFT$(A$,H 
-1)+MID$(A$,H+1) :GOT04172 ELSEIF 
Z $=CHR$ (21) ANDLEN ( A$ ) =1THENG0SUB 
33:PRINTMID$(A$,H+1) ; " " ; :GOSUB3 
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PRICKLY-PEAR SOFTWARE 

QUALITY PROGRAMS FOR YOUR COCO & TDP-lOO 

PROGRAMS REQUIRE 16K EXTENDED BASIC FOR TAPE, AND 32K DISK UNLESS OTHERWISE NOTED. 



HALL OF THE KING (Rainbow Review 6/86) 

This program combines all the things you look for in a great 
two disk graphics adventure program. The Hi-Res graphics 
are superbly done. The text portion of the screen and the 
graphics change quickly as you move through the HALL OF 
THE KING. You can move freely from one portion of the 
adventure to another. Call up your inventory at any time. You 
can even save or load a game at ANY time. HALL OF THE 
KING will challenge even the most seasoned adventurer. 

HALL OF THE KING requires 64K EB and one disk drive. This 
exciting two disk adventure comes packaged in a vinyl case. 
$39.95. 

HALL OF THE KING II (Rainbow Review 9/86) 

Continue your quest for the Earthstone in The Inner 
Chambers of the HALL OF THE KING. Outstanding graphics 
help show the way to success in your search to help restore 
the legendary power of the Earthstone to the dwarven race. 
The deeper you travel into the inner chambers, the more dif- 
ficult your progress becomes. HALL OF THE KING II has all 
the fine features of the first adventure. It is designed to 
follow the original HALL OF THE KING but may be played as 
a stand-alone adventure. The adventure fills two disks and 
comes packaged in a handsome vinyl folder. It requires one 
disk drive and 64K. $39.95 

WARP FACTOR X (Rainbow Review 2/86) 

If you have been waiting for a game for your color computer 
that has everything, your wait is over. WARP FACTOR X is 
here. This all graphics simulation game requires strategy, 
fast thinking, an eye for detail, and -above all experience in 
knowing the capabilities of your stauhip and its computer. 
(See review in Feb. 85 issue of Rainbow.) It requires 32K one 
disk drive and comes packaged in a vinyl library case. $34.95 

DARKMOOR HOLD (Rainbow Review 8/86) 

You and your comrades will explore the levels of Darkmoor 
Hold in an effort to gain great riches and defeat the dark 
wizard. The Wizard will soon realize the threat you pose and 
the many monsters you meet and battle will become stonger 
and more powerful as you move through the 10 levels of 
Darkmoor. A keen eye will help you find weapons and armor 
to aid your battle along with treasures for you to keep. Your 
party consists of a Dwarf, an Elf. and you, the Human, each 
with their own special attributes. The weapons, armor and 
treasure are placed randomly in each level to provide a new 
challenge each time you play. You may also save the game 
you are playing since defeating the evil Wizard is not an easy 
task. It has great graphics and an impressive text screen to 
give you more fun than a barrel of elves. Requires 64KEB and 
1 disk drive. $29.95 



POLICY ON PROTECTION 

We believe our customers are honest — all of our software 
can be backed up using standard backup procedures. 

Your Personal check is welcome - no delay. Include $1.50 
shipping for each order. TX residents add 5 1/8% sales tax. 
Orders shipped within two days. 

Dealer and author inquiries are always welcome. Canadian 
dealers should contact Kelly Software Distributors, Ltd. 608, 
STNT, Calgary, Alberta T5H 2H2, (403) 236-2161 




DRAGON BLADE (Rainbow Review 11/86) 
Animated Graphics Adventure 

This 100% hi-res graphics adventure features many animated 
screens which will delight the avid adventurer. You search for 
the magic Blade which is the only way to rid your homeland of 
the fearsome dragon which has risen from a long rest to ter- 
rorize your village. Fill your screen with super graphics as you 
try to solve the difficult challenge the village leaders have set 
before you. Dragon Blade requires 64K EB and 1 disk drive. 
$29.95 



# 



DOLLAR WISE 

In todays world of high finance, variable interest rates, 
balloon payments, and lease options there is a program that 
can help you sort out the details and make sense of the small 
print. DOLLAR WISE is an extremely flexible program that 
will allow you to find the best loan by substituting values for 
all the different variables that make up the loan. Find the 
future value and interest paid for either single or multiple 
deposit savings accounts. Determine mortgage interest paid 
during a lax year— very good for estimating tax savings on 
credit purchases also. Should you rent or buy. DOLLAR WISE 
gives you all the options. It will even provide a loan amortiza- 
tion table print out with Tax Year summaries either by month 
or year. Requires 32K Tape -$24.95 Disk - $27.95 



3 ^^^^ 



FONTFILE - (New tor the COCO III) 

FONTFILE replaces the standard Hi-Res COCO III font with a 
character set you select. Choose from a menu of 26 or create 
your own and save it to disk for future use. Use the fontfile in 
your own basic programs or livenup an old program with a Hi- 
Res font screen. FONTFILE will work on all versions of the 
COCO but is especially written to take advantage of the 
special capabilities of the new COCO III. Requires 64K and 
one disk drive. $24.95 



COMING SOON! 
Hall Of The King III 



Send for our free catalog 

Call (915) 584-7784 or 

Send Order To: PRICKLY-PEAR SOFTWARE 

213 La Mirada 

El Paso, Texas 79932 



7:A$=MID$(A$,H+1) :GOT04172 
417 6 IFZ$=CHR$(93)ANDLEN(A$)<CR- 
2THENGOSUB33 : Z$=INKEY$ : PRINT" " ; 
MID$ ( A$ , H) ; : G0SUB3 7 : A$=LEFT$ (A$ , 
H-l)+" "+MID$(A$,H) :GOT04172 

4177 IFINSTR(Z1$,Z$)=0THEN4179 

4178 IF(H>1 ANDH<CR-2)THENA$=LEF 
T$(A$,H-1)+Z$+MID$(A$,H+1) :H=H+1 
: LOCATE 1,V:PRINTA$; ELSE IF(H=1A 
NDH<CR-2 ) THENA$=Z $+MID$ ( A$ , H+l ) : 
H=H+1 : LOCATE 1 , V: PRINTA$ ; 

4179 GOSUB37:GOT04172 

4180 IF(PP+1) *LP<N THENPP=PP+1:G 
OTO4020 ELSESOUND100,5:GOTO4040 
4190 IFPP*LP>0 THENPP=PP-l:GOT04 
020 ELSE SOUND100,5:GOTO4040 
4200 GOTO4040 

5000 ' PRINT 

5001 CLS:PRINT"Is printer on (Y/ 
N)?";:LINEINPUTY$:IFLEFT$(Y$,1)= 
"Y" OR LEFT$(Y$,l)="y"THENPR=l E 
LSEPR=0 

5002 PRINT"How many copies" ;: INP 
UTNC : FORQ=lTO NC : CLS : Z $=M$ ( 5 ) : GO 
SUB3 9:PRINTPR$; 

5004 LM=10:RM=10:LG=80-LM-RM:LP= 

55 : PG=0 : L1=0 : SP=1 : BF=0 : B$=" " 

5010 FORI=0TON:IFI=N THENLF=1 

5020 A$=B$+L$(I) :B$="" :IFLEFT$(A 

$,1)=";"THEN 5500 'PRINTER COMMA 

ND 

5030 LL=LEN(A$) 

503 2 IFLL>LG THEN 5040 

5033 X=INSTR(A$,CHR$(126) ) :IFX>0 
THENMID$(A$,X,1)=CHR$(32) :B$="" 

5034 GOTO5055 

5040 B$=MID$(A$,LG+1) :A$=LEFT$(A 
$,LG) 

5041 IFRIGHT$(A$,1)<>" "THENB$=R 
IGHT$ (A$ , 1) +B$ : A$=LEFT$ (A$ , LEN (A 
$)-l) :GOTO5041 

5055 GOSUB5400 

5056 X=INSTR(B$,CHR$(126) ) :IFX>0 
THENA$=B$ : B$=" " : GOTO5030 

5060 NEXTI,Q 

5399 GOTO100 

5400 GOSUB3 3:LOCATELM,V:POKE&HFF 
D8,0:PRINTA$ 

5410 L1=L1+SP:IFSP=2THENPRINT EL 
SE IFSP=3THENPRINT: PRINT 

5411 IFPR=0THEN5490 ELSEPRINT#-2 
,TAB(LM) ;A$ 

5415 IFSP=2THENPRINT#-2:ELSEIFSP 

=3THENPRINT#-2 : PRINT#-2 

5420 IF(L1=>LP OR LF=1)THEN PRIN 

T#-2:L1=L1+1:IFL1=60 THENPRINT#- 

2, TAB (35) ;"-";PG+l;"-":PRINT#-2, 

CHR$ ( 12 ) : Ll=l : PG=PG+1 : LF=0 : ELSE5 

420 



5430 IFBFO0THENPRINT#-2,CHR$(27 
);"E"; "EMPHASIZED FOR EPSON MX- 

ON 

5431 IFBF=0THENPRINT#-2,CHR$(27) 
;»F"; 'EMPHASIZED FOR EPSON MX- 

OFF 
5490 POKE &HFFD9,0: RETURN 
5500 'PRINTER COMMANDS 
5510 X=INSTR(A$,"LM=") :IFX>0 THE 
NLM=VAL (MID$ ( A$ , X+3 , 2 ) ) : IFLM>20T 
HENLM=20 

5520 X=INSTR(A$, "RM=") :IFX>0 THE 
NRM=VAL(MID$(A$,X+3,2) ) :IFRM>20T 
HENRM=20 

5530 X=INSTR(A$,"LP=") : IFX>0THEN 
LP=VAL(MID$(A$,X+3,2) ) :IFLP>66 T 
HENLP=66 

5540 X=INSTR(A$,"PG=") : IFX>0THEN 
PG=VAL(MID$(A$,X+3,2) ) 
5550 X=INSTR (A$ , "SP=" ) : IFX>0THEN 
SP=VAL(MID$(A$,X+3,2) ) :IFSP>3THE 
NSP=3 

5560 X=INSTR(A$,"BF=") : IFX>0THEN 
BF=VAL (MID$ ( A$ , X+3 , 2 ) ) 
5570 X=INSTR(A$,";N") : IFX>0THENL 
F=l ELSE LF=0 
5575 LG=80-LM-RM 
5580 GOTO5060 
6000 ' RESUME 

60 10 CLS : H=0 : V=0 : Z $=M$ ( 6 ) : GOSUB3 
9 : PRINTPR$ ; 

6020 FORI=0TON-1:PRINTL$(I) :NEXT 
:PRINTL$(N) ; : POKE282 ,0 : GOSUB33 :G 
OSUB20 : POKE282 , 255 : GOTO 100 
7000 'KILL 
7005 POKE&HFFD8,0 

70 10 CLS : Z $=M$ ( 7 ) : GOSUB3 9 : PRINTP 
R$; :DIR: PRINT 

7020 PRINT"Enter Filename/Ext:"; 
: LINEINPUTF$ : GOSUB70 : IFUN=1THENU 
N=0:GOTO7010 
7030 ATTR1,1: PRINT :PRINT"Are you 

sure? (Y/N)?"; : INPUTS$ : IFLEFT$ ( 
S$ , 1) <>"Y"THEN70010 
7040 ATTR7,l:PRINT"Killing "+F$: 
KILL F$:POKE&HFFD9,0: GOTO 100 
8000 'DIR 

8010 CLS:POKE&HFFD8,0:Z$=M$(8) :G 
OSUB3 9 : PRINTPR$ ; : DIR: PRINT 
8020 ATTR7,1: PRINT" Press any key 

to return to MENU" :EXEC44539 : PO 
KE&HFFD9 , : GOTO100 

9000 POKE&HFFD8,0:POKE282,255:ST 
OP 

10000 PRINT "ERROR #";ERNO;"IN LI 
NE" ; ERLIN : GOTO9000 



/R\ 
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DOCTOR ASCII 



Command Causes CoCo 3 
System Crashes 



By Richard E. Esposilo 

Rainbow Contributing Editor 

with Richard W. Libra 



If I execute the following com- 
I! mands, either in direct mode or as 
part of a program, my Co Co 3 
crashes. This seems to be a design 
problem with the machine, since I have 
experienced the same problem with a 
number of machines. 

CLEAR 17000: WIDTH 40 

A similar problem arises if I run a 
program that constantly increases the 
size of the stack: 

10 WIDTH 40 
20 G05UB 30 
30 PRINT MEM:G0T0 20 

On the Co Co 3, the system crashes, 
whereas on my Co Co 2, I get an OM 
Error. The net result is that programs 
that use a lot of string space and/ or 
space for machine language segments 
will not run with the WIDTH 40 state- 
ment added. I would appreciate it if you 
could suggest possible solutions. 

Terry A. Jackson 

Associate Professor 

Midwest College of Engineering 

X) The designers of the CoCo 3, in 
/C an attempt to maintain as much 
compatibility as possible with the CoCo 
Is and 2s while abiding with the licens- 
ing agreements from Microsoft, could 
neither modify nor rewrite the ROM 
code of Color BASIC, Extended BASIC, 
or Disk BASIC. It had to be a patch job 
and the 8K had to come from an area 

Richard Esposito is a senior project 
engineer with Northrop Corp. He holds 
bachelor's, master's and doctorate 
degrees from Polytechnic Institute of 
Brooklyn. He has been writing about 
microcomputers since 1980. 




in the range S0000-S7FFF. Due to these 
design limitations, they chose Super 
Extended basic to use the address space 
S2000-S3FFF (16384-24575) as a swap 
area to permit the CoCo's 6809E to 
address the Hi-Res text screen from its 
normal 64 K address space. 

This design can cause problems if 
your program expects to find something 
in the swap space at the time it is 
swapped out. The solution is to keep the 
stack out of this area. Instead of clear- 
ing a lot of memory above S3FFF for 
machine language programs, use the 
PCLERR command to clear space below 
and place your CoCo 3 machine lan- 
guage programs in memory starting at 
$600 (for cassette) or $E00 (for disk). If 
you have huge character string require- 
ments, save the strings in a random 
access file. If file I/O is too slow, J&R's 
JramR 5I2K upgrade includes RAM 
disk software. The software is also 
available separately and is compatible 



with other 5I2K CoCo 3 upgrades. 
Keep in mind that the CoCo 3 is prima- 
rily an OS-9 machine and when running 
with It, none of these problems arise. 

MC-10 Software Available 

In your December '86 column, 
_ Nicholas Petroff asked if there was 
3 a way to make his MC-10 more like 
the CoCo. As a matter of fact, all the 
things he asked for (and more) are 
available for the MC-10 through the 
MC-10 users group. My MC-10 has 
Extended BASIC (EXT.BAS by Gary 
Fun), RAM disk fMCDOS by Gra- 
hame Pollock). Assembler (Ass-6803), 
MCOS (by MJB), Conversion pro- 
grams fCoToPo and PoToCo by Bob 
Schecter), Word Processor (TvlcWord 
by Bob Schecter) and various disas- 
semblers, utilities and programs. These 
programs are available both as listings 
in the MCUG newsletter and on tape. 
There is also a 64K upgrade available 
from Helen Francisco that gives 44K 
RA M for BASIC and M L programs and 
ROM 1.4 (on tape) which uses this extra 
memory. Anyone wanting more infor- 
mation should send $ I and a fflO SA SE 
to: MC-10 Users Group. Box 103, 
Owensville, IN 47665 for a sample copy 
of our 20-page newsletter. 

Larry Allen 

"D Face it, Larry. The MC-10. 
/C though it has lots of company 
(PC Jr., TI-994A, VIC-20, Sinclair- 
1000. etc.), is an orphan machine. I 
would still advise an MC-10 owner to 
cut his losses and go with a CoCo 3. The 
TV and cassette recorder with cable for 
the MC-10 will work with the CoCo 3, 
but that's about it. 
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CoCo 3 Keyboard 

M Where can I get a CoCo 3 keyboard 
U. for my CoCo 2? 

& John Wittman 

Greens Fork, IN 

T) Order part number AXX-0245 
jL from Radio Shack National Parts 
via your local Radio Shack dealer. The 
cost is $19.90. 

Upgrading the New CoCo 

H How do you upgrade a CoCo 3 to 
LA5I2K? Is soldering necessary? 
til Virginia Niewoehner 

Chicago, IL 

"D Soldering is not necessary. You 
*-jL unplug the four 41464 64K by 4 
RAM chips, cut out the disk capacitor 
C65 and then plug in the satellite mem- 
ory board. Various satellite memory 
boards are marketed by J&R Electron- 
ics, Radio Shack National Parts (Part 
No. AXX-71 17) and others. 

Scrambled Downloads 

} / own a CoCo 2 with one drive and 
Z (i DCM-3. My friend owns a TRS- 
I 80 Model I (old silver Z-80 model, 
not a CoCo) with two drives and a 
DCM-I modem. When we try down- 
loads, they always become scrambled 
on my end. 

Jimmy Munroe 
Sussex, New Brunswick 

13 First, one modem must be set to 
*~jL "Answer," the other to "Origi- 
nate." Second, both computers must be 
running smart terminal programs with 
identical protocol settings (i.e., word 
length, parity, stop bits, etc.). Third, 
since the machines are not software- 
compatible, only ASCII-formatted files 
or ASCII-saved BASIC programs can be 
transferred. 

Memory Poke for Disk 

/ have a converted 64 K CoCo with 
two disk drives. When typing in the 
memory poke, POKE 25, 6: NEW, / 
find that I cannot load anything from 
a disk. The disk starts to load but then 
quits in the middle of the load and 
continues to run with no further load- 
ing. I have to shut down the machine to 
do anything else. Why? Is there a fix? 
Raymond R. L. Hoem 
(MONTK1D) 
Billings. MT 



D Apparently, what you are trying 
}L to do is simulate a PCLERR0. Disk 
basic uses the area between &H600 and 
&HDFF, but by executing your poke, 
you let BASIC overwrite this area, raising 
havoc with Disk BASIC. If you want to 
use as much memory as possible with 
Disk BASIC, use POKE 25,14: POKE 
&HE00,0:NEW. 

Non-compatible Apple Drives 

/ just acquired two TEA C drives. 
They were used in the past on an 
Apple (Acorn) computer. I tried to 
use them with my CoCo but all I got 
were I/O Errors. I have one TEAC 
drive, the same kind, a slim-line, sort of 
like the new Radio Shack drives turned 
on their sides. I was wondering if I could 
configure these drives for a 64 K CoCo. 
Will I need any different configuration 
with the new CoCo 3? 

Erol Senakis 

(EROL) 

Elmhurst, NY 

~D Apple-compatible disk drives use 
/C a non-standard interface. CoCo 
drives use the IBM standard. Drives 
that work with the CoCo 1 or 2 will also 
work with the CoCo 3. 

9600 Baud on CoCo 3 

/ used to be able to poke a 1 into 
Location 150 for my printer speed on 
my old gray CoCo I. I have a CoCo 
3 now and it doesn't seem to recognize 
anything faster than an 18 or 2400 baud 
in POKE 150. I have a Model 10 J Metric 
Ind. serial-to-parallel converter and it 
ran my Okidata 192 fine at 9600 baud. 
Any suggestions? 

Ronald C. Bruellisauer 

(RONBWY) 

Cheyenne, WY 

13 Try poking a 4 into Location 150 
*-}C for 4800 baud. For9600 baud you 
will have to adjust your Model 101. 

ATTR Is a Pain 

/5 there any way to permanently 
disable the permissions feature for 
files in Level I OS-9? Having to 
remember to set RTTR every time I want 
to do something even though I have a 
single-user system is a pain. 

Clell Harmon 
(NAVYMANj 
Wichita, KA 



* 



I use OS-9 all the time and hardly 
ever need to mess with the RTTR 



command. The permissions feature is 
meant as a safeguard so that you can 
protect files from accidental erasure or 
modification. The only program I have 
found that requires me to go back and 
reset the permissions is StyFix, the 
configuration program for the word 
processor Stylograph, and it is only 
used once when setting up a new printer. 

Boot Query 

I enjoy learning BASIC by examining 
and modifying other programs. I 
have a very fine boot program for 
disk system, but for the life of me cannot 
figure it out. This is the listing: 



10 CLS 

20 R=PEEK(&H1B)*25G+PEEK 

(S.H1C)G 

30 PRINT"«flUT0 BODT»":PRINT 

40 PRINT"up BO UP" 

50 PRINT'doun GO DOWN" 

G0 PRINT"enter EXECUTE" 

70 PRINT"breal< ABORT" 

B0 EXEC R 

90 END 



// seems as though the only two lines 
that do anything are 10 and 80, yet if 
I type only these two lines and run, it 
will not work. If I load and run off my 
disk however, it works. Why is this? 

David Johnson 

(DA VIDJOHNSON) 

l^icesler, NC 

D Apparently, the BASIC program 
/£ you load from disk has an em- 
bedded machine language program 
attached to it. After loading the pro- 
gram, examine the address calculated 
from PEEK(27)*25G+PEEI<(28). You 
will find it is well past the end of your 
BASIC program allowing room for the 
ML. 

New Keyboard for an 'E' Board 

fj| / need to fit an '£" board with a 
|i newer keyboard. Would it be easier 
S to buy an adapter for the newer 
keyboards, or build one myself? 

Keith Wayne Smith 

(UGLY) 

Hardburly, KY 

T) You can purchase a keyboard 
A yC adapter for a nominal fee. Also, 
if you purchase a new keyboard up- 
grade from Tandy, it is included if you 
tell them that it is for an old CoCo 1. 
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Fantasy Clip Art Disk 
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Gnomes 5 elves* drasons and more».< 
lore than thirty clips for Cocomox- ■ • 
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You must have 
Cocomax. 

64K EXB disk $14-95 



Oriental Gallery I 

Twenty new full-screen pictures from a 
t o. I ent ed 9'" aph i c ar t i st . • • al I r eady t o 
print or use with your graphic editor* 
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A GUIDE TO COCO 3 BASIC AND GRAPHICS 

Do you want to learn more about your 
Color Computer 3? If so, A Guide to Coco 
3 Basic and Graphics is what you need! 

This practical guide to the Coco 3 is 
written by Linda Nielsen, a long time 
Coco user. It has more than 50 pages of 
examples, explanations, and programs 
especially for the Coco 3. 

Not only that, the Guide includes a 
disk of programs and pictures. Translate 
low res graphics onto the high resolution 
screen. Draw on the 320 by 192, 16 color 
or the 640 by 192, 4 color screens. 
Learn how to display 256 artifacted 
colors on a television or composite 
monitor. 

Unlock the power in your Color Computer 
3, order your GUIDE today! 
Price effective March 1 $21.95 



BETTER GRAPHICS ON 
YOUR COCO 3 

Use the graphic power 
of your Coco 3 ! More 
good information and 
examples of high res 
graphics on the Coco 3. 
Create better static 
illustrations. Learn 
more about Basic 
animation, screen 
scrolling, tips on 
HPUT and 11GET, how to 
use HDRAW and much more. 



% 



, 



BETTER 
GRAPHICS 
ON YOUR 

COCO 3 




Better Graphics on you r Coc o 



3 plus two disks of programs and pictures. $24.95. 



OKIMATE 20 WITH PLUG N 'PRINT 

Small, quiet and colorful! Eight vivid colors. 
Excellent print quality. Italics, super and sub 
scripts. Ten, twelve or fifteen characters to the 
inch. The perfect second printer for your Coco. 

Printer, Plug 'n 'Print , paper, black and color ribbons, 
instruction and software. $240 plus $10 shipping. 



GRAPHIC SCREEN DUMP FOR THE OKIMATE 20 

Dump PMODE 3 and PMODE 4 graphics from your Color 
Computer to the Okimate 20 printer. Select 2 color, 
color or black and white screen dumps. $29.95 



DOUBLE DRIVER II 

Finally a monitor driver for 
ihe Color Computer II that 
lets you use a monochrome 
and a color monitor 
simultaneously. We're proud 
of this new driver. The six 
transister circuit provides op- 
timal signal mixing and signal 
gain. Excellent monochrome 
output and better quality 
resolution in the color ouput 




than any driver we have 
seen. Audio output also. Fits 
all models of the Color Com- 
puter II. $29.95. 




THE COCO-SWITCHER 

A QUALITY PIECE OF HARDWARE 

The CoCo Switcher allows you to hook up 
three peripherals to your RS-232 jack. Con- 
nect your modem, printer and any other 
RS-232 compatible peripheral to the CoCo 
Switcher. An LED on ihe CoCo Switcher 
shows if your computer is on or off at a glance. 
The LED flickers when transmitting or receiv- 
ing data. 
$39.95 plus $2.00 shipping and handling 



DOUBLE DRIVER I 

The BEST monitor driver available. 
Color composite, monochrome and 
audio output. For original CoCo D, E 
and F boards. $24.95. 

MONO II 

Mono II for Color Computer 2. An 
excellent monochrome monitor driver 
thai has audio output also. Specify 
model needed. 

$24.95. 




ETON BAY SOFTWARE 

A Division of Moreton Bay laboratory 

316 CASTILLO STREET 

SANTA BARBARA 

CALIFORNIA 93101 

(805) 962-3127 

Ordering information 
Send $2.00 shipping and handling per order. We ship 
within 1 working day on receipt of order. Blue Label 
Service available. California residents add 6% sales tax. 




What's the Address? 

I am now using a CoCo 3 and some- 
times want to transfer a machine 
lili) language file from disk to tape to try 
it as a file on a tape-only system. Could 
you tell me at what memory addresses 
I could find the Start, End and Execute 
addresses of the most recently loaded 
from disk ML file? 

Steven G. Schnautz 
(W00DSM1TH) 
Ft. Myers. FL 

T) The addresses from disk machine 
/C language files cannot be peeked 
out of memory like they can with one 
that is loaded from tape. A program is 
needed to get this information. One 
such program that will give you this 
information is Jeff Francis' Disk Utility 
2. 1 A, $29.95 from Spectrum Projects. 

Corrosion Confusion 

/ have a 64K CoCo I, a 26-3024 
Multi-Pak, the older disk controller 
and an RS-232 pack. I have been 
having intermittent problems with my 
disk drives. The motors randomly 
turned on and sometimes the disk was 
written on, effectively destroying the 
format and data. The problem seemed 
to be connected with the RS-232 pack 
in Slot I of my Multi-Pak. It seemed as 
though I could fix the problem tempo- 
rarily by applying slight pressure to the 
controller pack. I removed the pack, 
took it apart and noted some corrosion 
on the ground tabs on the connector. I 
cleaned the connector and put the 
system back together and have not had 
the problem return. My question — was 
this a coincidence? If this could not have 
been the problem, what could the prob- 
lem be? 

Harold M. Wilson 

(HAU356) 

Austin, TX 

|v The problem was in the connec- 
/£ ,ors on your controller. Fre- 
quently, with controllers that do not 
have gold-plated connectors, oxidation 
causes corrosion to build up on the 
surfaces that mate with your CoCo. 
Using a pencil eraser to clean the con- 
nectors on your controller removes the 
oxidation from the surfaces and makes 
it as good as new. 

Can't Save to Disk 



/ am using a direct connect modem 
pack with a multipack. I have been 
told there is a poke that would allow 



me to save to disk. For the life of me 
I can't find a soul who knows it. Can 
you help? 

Vince Falcone 

(1YA VI N) 

Minden, NV 

jD As with the RS-232 pack, the 
*}C software in the ROM of your 
modem pack is tape-oriented. With a 
disk, it is useless unless you are using 
OS-9 Version 2.0 or later. 

OS-9 Level 1 Patches 

I have a CoCo 3 and cannot boot my 

OS-9 Level I, Version 1.00. Is there 

an easy way to get it to run? I asked 

a local Radio Shack dealer if he knew 

of any upcoming patches, but he just 

recommended that I purchase Level II. 

John C. Henneberger 

(A MX) 

Tucson, AZ 

IP The patches are now in the down- 
/k load section of rainbow's new 
OS-9 Online SIG on Delphi. 

Compatibility With the CoCo 3 

n Now that the CoCo 3 has become 
" widely available, I have a few ques- 
_ lions. First, am I able to use my old, 
silver TEC drive on a new CoCo 3? The 
salesman at my local Radio Shack store 
has no clue as to whether it would be 
possible or not. Secondly, will my old 
software (VIP Desktop, CoCo Max II. 
etc.) work on the CoCo 3? 

Fredrik J. Ahlberg 

(FREDALBERG) 

Kingston, NH 

13 Your old controller requires 12 
/C volts. You can get the required 12 
volts from a CoCo 3 adapted multipack, 
or you can get the 12 volts by running 
a wire from the I2-volt source on your 
disk drive's power supply (this requires 
some hardware experience). Patches for 
CoCo Max are now on Delphi. Hints 
as to how to fix various versions of VI P 
software are there too. 



Disk Controller Can't Be Shared 

1 / would like to hook up my CoCo 
_ 2 and CoCo 3 to work with one disk 
_j controller and one TV, but have run 
into a few problems. I have found a Y 
cable that I think will work for the 



controller, but haven't found a way to 
connect the TV vet. Can you help? 

Edward A. Wolf 

(LSPC) 

Queens, NY 



13 Thanks to Marty Goodman for 
/(■ the following reply: You can 
make up a switch box that can switch 
the video input of the TV between a 
CoCo 2 and 3. Or you can buy such 
boxes from Radio Shack or other con- 
sumer electronic suppliers. They are 
inexpensive and widely available. It is 
impossible to electrically switch a disk 
controller between CoCos in any simple 
or effective fashion. A Y cable will not 
work in this situation, and may well 
destroy both CoCos and/or the disk 
controller if you try to use it in the 
manner you seem to be describing. You 
must power down your entire system 
and physically move the disk controller 
from one CoCo to the other to "share" 
the disk controller. 



Multi-Pak Extension Cord 

/ am trying to make an extension 
cord to free my CoCo from my 
Multi-Pak. What I need to know is 
if there is a limit to the length between 
the two. Also I would like to know what 
the limit is for extending the cable 
between the keyboard and mother- 
board. 

Eric A. Canha 

(MARKTWAIN) 

Fairhaven, MA 



13 Any type of extension cable for 
*-pC your multipack will lead to 
unreliable disk operation due to timing 
problems. Don't do it! 

As for the keyboard cable, some 
hackers report using cables 6 to 10 feet 
in length with no problems. 



For a quicker response, your 
questions may also be submitted 
through rainbow's CoCo SIG on 
Delphi. From the CoCo SIG> 
prompt, pick Rainbow Magazine 
Services, then, at the RAIN- 
BO W> prompt, type ASK for "Ask 
the Experts" to arrive at the EX- 
PERTS> prompt, where you can 
select the "Doctor ASCII" online 
form which has complete instruc- 
tions. 
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CALLIGRAPHER 



CoCo Calligrapher - (Hybrid 
BASIC/ML) Turn your CoCo and dot- 
matrix printer into a oalligraplier's quill. 
Make beautiful invitations, flyers, 
certificates, greeting cards, labels and 
more. Includes 3 fonts: Gay Nineties, Old 
English and Cartoon. The letters are K 
inch high and variably spaced. Works with 
many printers including Epson, Gemini, 
Radio Shack, Okiduta 92A, Banana and 
Prowriter. Additional fonts are available 
(see below). Tape/Disk; $2-1.05. 

OS9 Calligrapher - (C) Although a 
different program from the CoCo Calligra- 
pher, the OS0 Calligrapher prints all the 
same fonts. It reads a standard text file 
which contains text and formatting direc- 
tives. You may specify the font to use, 
change fonts at any time, centering left, 
right or full justification, line fill, margin, 
line width, page size, page break and in- 
dentation. Similar to troff on UNIX (tin) 
systems. Includes Gay Nineties, Old En- 
glish and Cartoon fonts. Additional fonts 
are available (see below). Disk onlv; OS9; 
$24.05. 

Calligrapher Fonts - Requires Calligra- 
pher above. Each set on tape or disk; 
specify RSDOS or OS9 version; $11.05 
each. Set #1 - (0 fonts) Reduced, re- 
versed and reduced-reversed versions of 
Gay Nineties, Old English and Cartoon; 
Set #2 - (8 fonts) Old Style and Broad- 
way; Set #3 - (8 fonts) Antique and Busi- 
ness; Set #-1 - (8 fonts) Wild West and 
Checkers; Set #5 - (10 fonts) Stars, lie- 
brew and Victorian; Set #0 - (8 fonts) 
Block and Computer; 

Economy Font Packages on disk; speci- 
fy RSDOS or OS9; 20.05: Font Pack- 
age #1 - Above font sets 1, 2 and 3 (25 
fonts) on one disk. Font Package #2 - 
Above font sets 4, 5 and 6 (20 fonts) on 
one disk. 

UTILITIES 

Auto Run 01 - (Hybrid BASIC/ML) Util- 
ity to allow your own tape-based BASIC or 
Ml, programs to display a graphics title 
screen and then self-start after loading. In- 
cludes a graphics editor to create profes- 
sional looking title screens. Tape only; IGK 
ECB; $10.05. 

Piratector - (100% ML) Utility to allow 
your own disk-based BASIC or ML pro- 
grams to display a graphics title screen 
and then self-start after loading. Adds 
copy protection to your programs but still 
allows users to create non-execulabte back- 
ups! Includes Semigraf. Disk only; CoCo !, 
II, III (except Semigraf); $30.05.' 



A complete catalog of other sweet 
Sugar Software products Is avalluhlc. 



Semigraf Graphics Editor - (100% ML) 
Use 8 colors and standard text characters 
to draw graphics pictures and screens in 
high resolution semigraphics mode. In- 
cludes sample pictures. Tape/Disk; 16K 
CB; $10.05. 

Super Screen Machine - (100% ML) Put 
your CoCo into high resolution mode for 
your own BASIC or ML programs. Smooth 
scroll, key click, lower case with colored 
characters, many other features. 
Tape/Disk; 32K CB; CoCo I, II, III (except 
6-1K mode); $10.05. 

Color Disk Manager - (100% ML) Disk 
utility with these features: Disk repair, 
selective track initialization, verity sectors, 
backups, tape to disk transfer, ROM Pak 
execution from disk, much more! 
Tape/Disk; CoCo 1, II, III (except for 64K 
mode); $21.95. 

Color Tape Manager - (100% ML) Tape 
utility with these features: display start, 
end and exec address or ML programs, 
convert ML programs into BASIC DATA 
statements, append ML to BASIC, load, 
display/modiry and save tape file, handles 
missing EOF and filename blocks, much 
more! Tape/Disk; IGK ECB; CoCo I, II, 
HI (except for 64 K mode); $10.05. 

INFORMATION MGT. 

TIMS (The Information Management 

System) - (Hybrid BASIC/ML) Tape or 
disk, fast and simple general data base 
program. Create files of records that can 
be quickly sorted, searched, deleted and 
updated. Powerful printer formatting. Up 
to 8 user fields, sort on up to 3 fields. 
Tape/Disk; $10.05 (see combo pkg below). 

TIMS Mail - (Hybrid BASIC/ML) Tape 
or Disk based mailing list management 
program. Files are compatible with TIMS. 
Fast and simple to use. Supports labels 1, 
2 or 3 across, 214 to 4 inches wide. 
Tape/Disk; $10.05 (see combo pkg below). 

TIMS Utility - (Hybrid BASIC/ML) Util- 
ity companion for TIMS and TlMS Mail 
to allow multi-term search (Ah'D and OR 
logic), global change and delete, split large 
files and more! Tape/Disk; $14.05 (see 
combo pkg below). 

TIMS Combo Package - All three or the 
above programs: TIMS, TIMS Mail and 
TIMS Utility on one disk - $34.05. 

SPORTS STATISTICS 

Statistics programs for the coach, team 
manager or avid fan who wants to keep 
accurate team and opponent records. 
Printer output supported. The following 
are available: Baseball, Basketball, Foot- 
ball and Soccer. Disk only; $10.05 each. 
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EDUCATIONAL 
Silly Syntax - (Hybrid BASIC/ML) Ages 
5 anil up. Story creation game; output to 
screen or printer; includes 2 stories or 
create your own. Tape/Disk; $10.05 or 
disk with 62 stories for $20.05. Sets of 10 
stories on tape/disk for $1.95: Fairv 
Tales, Current Events, X-Rated, Sing- 
Along. Adventure. Potpourri. 

Bible Stories Adventure - (Hybrid 
BASIC/ML) Ages 4 and up. A simple 
graphics adventure game for young chil- 
dren and their families. Old testament. 
Tape/Disk; $10.05. 

The Presidents of the USA - (100% 
ML) Ages 10 and up. Two trivia games, 
user modifiable, printer output supported. 
Tape/Disk; I0KECB; $10.05. 

The Great USA - Ages 9 and up. Shar- 
pen your knowledge of the 50 states. Cap- 
itals, nicknames, abbreviations, flowers, 
trees, birds. Trivia! Tape/Disk; IGK ECB; 
$10.05. 

Galactic Hangman - Ages 7 and up. Ex- 
citing new twist to the popular word 
game. Outstanding graphics; 700 word vo- 
cabulary. Tape/Disk; IGK ECB; $10.05. 

PreReader - (Hybrid BASIC/ML) Ages 
3-5 (level I); Ages 5-7 (level 2); Great 
graphics and music. Level 1: matching 
colors, shapes, letters and numbers; Level 
2: association of letters and consonant 
blends with their sounds. Tape/Disk; Joys- 
tick; $10.05. 

Stat.graf - High school and college level; 
Linear regression analysis program com- 
bined with a plotting and line graphing 
system. Enter up to 250 x/y pairs; data 
transformation; residuals; regression line; 
rint graph with screen print program 
not supplied); much more! Tape/Disk; 
"10.05. 

SPECIAL INTEREST 

Rental Property Income and Expense 
Management Package - Maintain your 
rental property income and expense 
records. Print output supported. 28 ex- 
pense categories. This program may br tax 
deductible. Disk only; $20.05. 

Radio Systems Design Calculations - 
Performs 14 different calculations common- 
ly used in design or evaluation of land 
mobile radio svstems, satellite TV, etc. 
Tape/Disk; $10)05. 

CoCo Knitter - Easy to use program to 
display or print instructions to knii a 
sweater: Cardigan or Pullover; Round or 
V-neck; Raglan or Set-in Sleeve; 3 weights 
or yarn; 8 sizes from babv to man 
Tape/Disk; $10.05. 

Flying Tigers - 1100% ML) Fast De- 
fenders style arcade game. 5 levels or 
difficulty; Great graphics and sound 
effects. Tape/Disk; Joystick; $10.05. 
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'TRS-80 is a trademark of Tandy Corp. 



SUGAR SOFTWARE 

P.O. Box 7116 

Hollywood, Florida 33081 

(305) 981-1211 



All proynwie run on tht CoCo /, II nnd III, $PK 
Extended Batic, unk*e otherwise noted. AA>\ 
$1.50 per tape or disk for postage and handling. 
Florida residents add t>% sales lax. COD orders 
add $4. Dealer inquiries invited. 
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By John Collico 




M#^ idsmath is designed to help children enjo) learning 
Jra math kills. Only positive rewards are given, to en- 
Ma courage the child and make learning more fun. 

The problems are drawn onscreen, with a flashing box 
designating where the correct answer should go. This helps 
the child learn the proper location of digits for problems 
whose answer is more than 9. 

After the problem is drawn on the screen, the child may 
enter his answer. If two incorrect responses are given, a 
visual help is displayed on the bottom of the screen. 1 found 
my own two girls progressed beyond the helps after a while. 

A big star is drawn on the screen when a correct response 
is given, regardless of how many wrong guesses the child 
may have made. After every five correct answers there is 
a five-star salute to the player, then play resumes. 

To have a version of Kidsmath for subtraction problems, 
make the following changes: 

Insert 185 IF O-T<0 THEN 1B0 

S85 FDR FF=1 TO 300: NEXT FF 
Change 230 LINE (10,105) - (170,110) , PSET,BF: 
LINE (40,70)-(G5,75),PSET,BF 
240 TT=0-T:OS=STRS(TT) 
GS0 U=7 

GB0 CIRCLE ( U, I ), S, 1: PAINT (U, I), 1,1 
Delete lines 210 and 650. □ 



John Collicott is employed by Radio Shack in Hutchinson, 
Kansas. He belongs to a recently formed Color Computer 
club and his hobbies include programming his CoCo 2. 
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150 


...177 END.. 
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The listing: ADDITION 

i goto npja 

5 'KIDSMATH BY JOHN COLLICOTT 

10 CIRCLE (X,Y-1) ,24,3,l:LINE(X-2 
2 , Y-3 ) - (X-22 , Y+3 ) , PSET : LINE (X+2 2 
, Y-2 ) - (X+2 2 , Y+2 ) , PSET : LINE (X-2 , Y 
-23 ) - (X+2 , Y-23 ) , PSET : LINE (X-2 , Y+ 
21)-(X+2,Y+21) ,PSET 

11 CIRCLE (X,Y-1) ,16,3 

12 PRESET (X, Y+2 2) : PRESET (X, Y+23 ) 
:LINE(X-3,Y-24)-(X+3,Y-24) ,PRESE 
T: PRESET (X, Y-25) : PRESET (X-24 , Y-l 
) : PRESET (X+24, Y-l) : PRESET (X-24 , Y 
-2) : PRESET (X+24, Y-2) 

13 PAINT(X-17,Y-1) ,3,3 
15 RETURN 

20 DRAW"BM"+STR$ (X-15) +" , "+STR$ ( 
Y+20)+" ;BR7R20U5L5U38L10G8F5E5D3 
0L8D5" 

21 PAINT(X,Y-15) ,3,3 
25 RETURN 

30 DRAW"BM"+STR$ (X-20) +" , "+STR$ ( 
Y+15)+" ;D5R40U5L30" 

31 LINE(X-20,Y+15)-(X+11,Y-10) ,P 
SET : LINE (X-10 , Y+15 ) - (X+21 , Y-8 ) , P 
SET:LINE(X-18,Y-15)-(X-11,Y-12) , 
PSET 

32 CIRCLE(X,Y-5) ,2)3,3,1, .6, .98:P 
RESET(X,Y-25) : PRESET (X, Y-24 ) : LIN 
E (X+20 , Y-9 ) - (X+20 , Y-3 ) , PRESET 

33 CIRCLE(X,Y-5) ,15,3,1, .6, .96 

34 PAINT (X-10,Y+17) ,3,3 

35 RETURN 

40 CIRCLE(X,Y-5) ,15,3,1, .6, .98 

41 CIRCLE(X,Y+3) ,15,3,1, .03, .4 

42 LINE (X+13, Y+2) -(X+6, Y-l) , PSET 
:LINE -(X+13, Y-6) , PSET 

43 CIRCLE(X,Y-5) ,20,3,1, .6, .99:C 
IRCLE(X,Y+3) ,20,3,1, .02, . 4 : PRESE 
T(X,Y-25) :PRESET(X,Y-24) : PRESET ( 
X,Y+23) : PRESET (X,Y+22) 

44 LINE(X+19,Y-5) -(X+15, Y-l) , PSE 
T:LINE-(X+19,Y+4) ,PSET 

45 LINE(X-18,Y-15)-(X-11,Y-12) ,P 
SET : LINE (X-16 , Y+15 ) - (X-10 , Y+10 ) , 
PSET 

46 PAINT(X,Y-22) ,3,3 

47 RETURN 

50 DRAW"BM"+STR$ (X+15) +" , "+STR$ ( 
Y+20)+";U15R4U5L4U23L6D23L20U23L 



5D28R25D15R6" 

51 PAINT (X+13, Y+15) ,3,3 

52 RETURN 

60 CIRCLE (X-2 , Y+2 ) , 2/9 , 3 , 1, . 65 , . 4 

: PRESET (X-2 , Y+22) : PRESET (X-2 , Y+2 
1) : PRESET (X-2, Y-18) : PRESET (X-2 ,Y 
-17) : PRESET (X+18, Y+2) 

61 LINE(X-16,Y+16)-(X-11,Y+12) ,P 
SET 

62 DRAW"BM"+STR$(X-13)+", M +STR$ ( 
Y-4 ) +» ; L7U20R3 5D5L30D9 " 

63 CIRCLE (X-2, Y+2) ,15,3,1, .6, .37 

64 PAINT (X+15, Y+2) ,3,3 

65 RETURN 

10 CIRCLE (X-2, Y+3) ,18,3,1, .65, .4 
7 : PRESET (X-2 , Y-15) : PRESET (X-2 , Y- 
14) : PRESET (X+16, Y+3) : PRESET (X-2, 
Y+21) : PRESET (X-2, Y+2 0) 

71 CIRCLE (X-2, Y-10) ,18,3,1, .55, . 
9 : PRESET (X-2 , Y-28 ) : PRESET (X-2 , Y- 
27) 

72 CIRCLE (X-2, Y+3) ,13, 3: CIRCLE (X 
-2,Y-lj2) ,13,3,1, .55, .88 

73 LINE(X-18,Y+5)-(X-18,Y-14) , PS 
ET 

74 LINE(X+4,Y-18)-(X+8,Y-19) , PSE 
T 

75 PAINT (X-15, Y+2) ,3,3 
7 6 RETURN 

8j3 DRAW"BM"+STR$ (X+2j3) +" , "+STR$ ( 
Y-25)+ M ;L40D5R35" 

81 LINE (X+20, Y-25) - (X+5, Y+2J3) , PS 
ET : LINE- ( X-2 , Y+20 ) , PSET : LINE- (X+ 
13,Y-2j3) ,PSET 

82 PAINT (X-15, Y-23) ,3,3 

83 RETURN 

90 CIRCLE(X,Y-9) , 10 , 3 : PRESET (X, Y 
+1) : PRESET (X,Y) 

91 CIRCLE(X,Y+7) , 10 , 3 : PRESET (X, Y 
-3) : PRESET (X, Y-2) 

92 CIRCLE(X,Y-5) ,20,3,1, .54, .97: 
CIRCLE (X, Y+3) ,20,3,1,-03, .47: PRE 
SET(X,Y-25) :PRESET(X,Y-24) :PRESE 
T(X-20,Y-5) :PRESET(X,Y+23) :PRESE 
T(X,Y+22) 

93 LINE(X+19,Y-6)-(X+14,Y-l) , PSE 
T:LINE-(X+19,Y+4) , PSET 

94 LINE(X-18,Y-6)-(X-14,Y-l) , PSE 
T:LINE-(X-18,Y+4) ,PSET 

97 PAINT (X-15, Y-5) ,3,3 

98 RETURN 

100 CIRCLE (X,Y-10) ,18,3,1, .15, .9 
9:PRESET(X,Y-28) : PRESET (X, Y-27) : 
PRESET(X,Y+8) : PRESET (X, Y+7 ) : PRES 
ET(X-18,Y-10) 

101 CIRCLE (X, Y+3) , 18 , 3 , 1 , .02 , . 4 : 
PRESET (X, Y+21) : PRESET (X, Y+20) 

102 CIRCLE (X,Y-10) ,13, 3,1: CIRCLE 
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(X,Y+3) ,13,3,1,0, .4 

103 LINE(X+16,Y+5)-(X+16,Y-14) ,P 
SET 

104 LINE(X-10,Y+13)-(X-7,Y+9) , PS 
ET 

105 PAINT (X,Y+4) ,3,3 

106 RETURN 

139 •*** THE ROUTINE FOR SELECTI 
NG RANDOM NUMBERS 

140 PMODE 3,1: SCREEN 1 , : PCLS : CO 
LOR 3 

150 BL=RND ( -TIMER) :0=RND(GN) 

160 Y=30:X=100:SW=0 

170 ON GOSUB 20,30,40,50,60,70 

,80,90,100,10 

180 T=RND(GN) 

190 Y=80:N=1:CC=0 

200 ON T GOSUB 20,30,40,50,60,70 

,80,90,100,10 

210 IF 0+T>9 THEN X=60 ELSE X=10 

220 Y=140 

230 LINE(10,105)-(170,110) ,PSET, 

BF : LINE ( 50 , 60 ) - ( 5 5 , 8 5 ) , PSET , BF : L 

INE (40 ,70) -(65,75) ,PSET,BF 

240 TT=0+T:0$=STR$(TT) 

250 PLAY"O5L200ABABABABABABCCC" 

299 '*** KEYBOARD CHECK FOR THE 



ANSWER 
300 A$=INKEY$ 

310 SW=SW+l:IF SW=1000 THEN 1 
3 20 COLOR C 

330 LINE(X-25,Y-25)-(X+25,Y+25) , 
PSET,B 

340 C=C+l:IF C>4 THEN C=2 
350 IF A$="" THEN 300 ELSE 360 
360 COLOR l:LINE(X-25,Y-25)-(X+2 
5,Y+25) ,PSET,B 
3 70 COLOR 3 

380 IF MID$(0$,N+1,1)=A$ THEN 40 
ELSE 3 90 

3 90 CC=CC+1:IF CC=2 THEN 600 ELS 
E 300 

400 A=INSTR("0123456789",A$) 
410 ON A GOSUB 10,20,30,40,50,60 
,70,80,90,100 
420 C$=C$+A$ 

430 IF VAL(C$)=VAL(0$) THEN 
ELSE 440 
440 X=X+40:N=N+1 

GOTO 300 

0$=" " : A$=" " : C$=" " : TT=0 

FOR E=l TO 200: NEXT E 

GOSUB 800 

ANS=ANS+1:IF ANS=5 THEN 



500 



450 
500 
510 
520 
530 



1300 



ELSE 150 



****** SELECTED SOFTWARE ****** 



* LOW PRICES * FAST SERVICE * FREE SHIPPING * 



SOLDERLESS UPGRADE KITS 
With easy-to-follow instructions 

512KFORCOC0 3 $99.95 

51 2K SOCKETED BOARD W/0 RAM $44.95 

512K RAMDISK FOR COCO 3 $19.95 

64K FORE BOARD $39.95 

64K FOR F BOARD $29.95 

64K FOR C0C02- (ALL MODELS) $29.95 
'All Korean models require one solder joint 
Please specify model » with order 

NOTE: ALL ICs used in our kits are first quality 150 NS 
prime chips and carry one lull year warranty. 

BASIC ROMs DISASSEMBLY 

COLOR BASIC UNRAVELLED $17.95 

EXTENDED BASIC UNRAVELLED $17.95 

DISK BASIC UNRAVELLED _ $17.95 

ALL 3 BOOKS ONLY $39.95 

ULTRA 80C DISK EDITOR ASSEMBLER $29.95 

BUG OUT S THE ORACLE (M.L. Monitor) $14.95 

ALL 5 ITEMS ONLY $59.95 

500 POKES, PEEKS. N EXECS $16.95 

200 POKES. PEEKS. N EXECS $9.95 

UTILITY ROUTINES (VOLUME 1) $19.95 

WITH ROUTINES ON TAPE OR DISK - $36.95 

ASSEMBLY LANGUAGE PROGRAMMING 

(TEPCO) $16.95 

ALL 10 ITEMS ONLY $119.95 



UTILITIES & APPLICATIONS 

TAPE DISK 

DYNACALC S69.95 

TELEWRITER 64 $39.95 $49.95 

ULTRA TELEPATCH II $19.95 

TOM MIX MAS ASSEMBLER . $49.95 

AUTOTERM $29.95 $39.95 

PEN PAL 2.1 $74.95 

ADOS $27.95 

THE PEEPER W/SOURCE $24.95 $26.95 

DISK UTILITY 2.1A $14.95 

GRAPHICOM $21.95 

UTILITY ROUTINES VOL. 1 $21.95 $21.95 

UTILITY ROUTINES VOL. 2 $27.95 

SUPER TAPE/DISK TRANSFER $21.95 

DISK TUTORIAL (2 DISKS).. $34.95 

COCO MAX WITH TAPE $64.95 

COCO MAX II WITH DISK $74.95 

Y-CABLE $24.95 

DS-69A DIGISECTOR $139.95 

HJL-57 KEYBOARD $59.95 

EPROM ERASER $39.95 

ROMPACK P C. BOARD W/CASE $9.95 

VIDEO PLUS IIU $34.95 

REAL TALKER II 

W/3 TALKING GAMES $54.95 

8-BALL POOLTABLE GAME $14.95 



GAMES 

TAPE DISK 

WRESTLE MANIAC $26.95 $26.95 

BOUNCING BOULDERS $26.95 $26.95 

THE GATES OF DELIRIUM $35.95 $35.95 

GANTELET $26.95 $26.95 

MISSION F-16 ASSAULT $26.95 $26.95 

PAPER ROUTE $26.95 $26.95 

KARATE $26.95 $26.95 

KNOCK OUT $26.95 $26.95 

P51 MUSTANG $26.95 $29.95 

WORLDS OF FLIGHT $26.95 $29.95 

WIZARD'S CASTLE $21.95 

ROLLER CONTROLLER 

(COC03) $24.95 $24.95 

PACKAGE SPECIALS 

SELECTED SOFTWARE PAC: Galagon. Cubix Froggie. 

Lancer & Lunar Rover Patrol (All 32K M.L.) 

$34.95 TAPE OR DISK 

ADVENTURE PAC: 5 Advonlure Games (Mostly 32K) 

$19.95 TAPE OR DISK 

EDUCATIONAL PAC: 6 Educational Games 

(16K « 32K) $19.95 TAPE OR DISK 

TREASURY PAC: A collection ot 30 games (4K -32K) 

$29.95 TAPE OR DISK 

NEW BOOKS FOR COCO 3 

Color and Extended Basle Unravelled $29.95 

Super Extended Basic Unravelled $19.95 

Both lor only $44.95 



WE PAY SHIPPING in the United States, Canada & Mexico. 
Overseas please add 1 0%. (MN Residents add 6% sales tax.) 
We accept Visa, Mastercard, check or money order. U.S. 
funds only for foreign orders. C.O.D. please add $2.00. 



Send to: 



SELECTED SOFTWARE 



P.O. Box 32228, Fridley, MN 55432 
24 HOUR ORDER LINE 612-757-2439 
INFORMATION 612-757-1026 (11 A.M.-5 P.M. CSX] 
24 HOUR SHIPPING 
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599 '*** THE HELP SCREEN 

600 U=7: 1=185: FOR W=l TO 
61^5 COLOR 2 

620 CIRCLE (U, I) ,6:PAINT(U,I) ,2,2 

630 U=U+13 

640 NEXT W 

650 LINE(U-4,I)-(U+4,I) ,PSET:LIN 

E(U,I-4)-(U,I+4) ,PSET 

660 U=U+13 

670 FOR W=l TO T 

680 CIRCLE (U, I) , 6 : PAINT (U, I) ,2,2 

690 U=U+13 

700 NEXT W 

710 CC=0 

720 COLOR 3 

730 GOTO 300 

799 •*** THE STAR 

800 H=215:V=3 5 
810 COLOR C 

820 LINE(H-9,V-13)-(H,V-35) , PSET 

:LINE-(H+9,V-13) ,PSET 

830 LINE(H+9,V-13)-(H+35,V-13) ,P 

SET:LINE-(H+15,V+10) , PSET 

840 LINE(H+15,V+10)-(H+25,V+35) , 

PSET: LINE- (H,V+17) , PSET 

850 LINE(H,V+17)-(H-25,V+35) , PSE 

T:LINE-(H-15,V+5) , PSET 

860 LINE(H-15,V+5)-(H-35,V-13) ,P 

SET:LINE-(H-9,V-13) , PSET 

870 PAINT(H,V-32) ,C,C 

880 IF FLAG=1 THEN RETURN 

890 COLOR 3 

900 PLAY"05L255AABBCBBAEDDABCAAB 

BCB" 

910 FOR WT=1 TO 1000: NEXT WT 

920 PCLS: RETURN 

1000 'RERUN GAME 

1010 PCLS 

1020 N=l : CC=0 : A$=" " : 0$=" " : TT=0 : A 

NS=0 

1030 GOTO 150 

1100 'TITLE SCREEN 

1110 CLEAR:CLS(3) 

1120 FOR TL=1 TO 2 

1130 PRINT @TS,"",* 

1140 FOR TN=1 TO 8 

1150 PRINT TN;"+"; 

1160 NEXT TN 

1170 TS=448 

1180 NEXT TL 

1190 PRINT 0105," KIDSMATH " 



1200 PRINT @137," BY " 
1210 PRINT @169,"JOHN COLLICOTT" 
12 20 PRINT @201," INMAN, KANSAS " 



1230 PRINT @233," JAN. 17,1986 " 

1240 PLAY"T404L4DDL8DC03B-GL2FB- 

04L4CCL8DCO3B-O4L8DL2 . C03L8FE-DF 

B-04C03L4B-L8B-AGAB-GL4F04L8DC03 

L8 B-AB-GAFA04 C03 LIB- " 

1250 FOR X=l TO 1000: NEXT X 

12 60 CLS 
1270 GN=9 
1280 GOTO 140 

1299 '*** FIVE STAR SCREEN 

1300 PCLS 
1310 FLAG=1 

1320 C=2:H=35:V=35 

13 30 GOSUB 810 
1340 C=3:H=215:V=35 

13 50 GOSUB 810 
1360 C=4:H=35:V=155 
1370 GOSUB 810 

1380 C=2:H=215:V=155 

1390 GOSUB 810 

1400 C=2:H=125:V=95 

1410 GOSUB 810 

1420 FLAG=0 

1430 PLAY"T403L4AL8AAL4ABAF#L2DL 

4AL8AAL4AF#L4DDEF#04DL8DDL4DED03 

BL2G04L4DL8DDL4C#03BL2AL4ABL2AL4 

AGL2F#L4F#EL1D" 

1440 FOR WAT=1 TO 1000: NEXT WAT 

1450 COLOR 3 

14 60 GOTO 1000 ^ 



One- Liner Contest Winner . . . 

Try this vacation planning helper before your next 
road trip. Just answer the prompts and let your CoCo 
give you the answers. 

The listing: 

CLS0: INPUT "ROUND TRIP MILES", 'D 
: INPUT" AV . MPH" ; S : INPUT " AV . MPG" ; F 
: INPUT"EST . $/GAL . " ; C : INPUT" # NIG 
HTS";Y:PRINT"$/night":INPUT"LODG 
ING";L:INPUT"FOOD";E:INPUT"MISC" 
;M:PRINTD/S"HRS. DRIVING - TOTAL 
COST" : PRINTUSING"$$### . ##" ; D/ (F* 
C)+(L+E+M) *Y: 'VISIT ALBERTA 



Barry Wiedman 
Edmonton, Alberta 



(For this winning one-liner conlesl entry, the author has been sent copies of 
both The Second Rainbow Book of Simulations and its companion Vie Second 
Rainbow Simulations Tape,) 
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DIGISECTOR 

DS-69B 

VIDEO 

IGITIZER 

FOR THE 

COCO 3 



sOPlfoti " ,!! 





COCO 3 SCREEN 



USE YOUR COCO 3 TO ITS FULL POTENTIAL! 

Use The Micro Works' DIGISECTOR™ DS-69 or 
DS-69B and your COCO 3's high resolution graphics 
to capture and display television pictures from your 
VCR or video camera. The DIGISECTOR'" systems are 
the only COCO video digitizers available that 
accurately capture and reproduce the subtle shades of 
gray in TV pictures! 

• COLOR: Add color to your screen for dramatic 

special effects. 

• HIGH RESOLUTION: 256 by 256 spatial resolution. 

• PRECISION: 64 levels of grey scale. 

• SPEED! 8 images per second on DS-69B, 

2 images per second DS-69. 

• COMPACTNESS: Self contained in a plug-in 

Rompack. 

• EASY TO USE: Software on disk will get you up and 

running fast! 

• COMPATIBLE: Use with a biack and white or color 

camera, a VCR or tuner. 

• INEXPENSIVE: Our low price puts this within 

everyone's reach. 

POWERFUL C-SEE 3.3 SOFTWARE 

This menu-driven software 

will provide 5 and 16 shades 

of gray to the screen and to 

the printer with simple 

joystick control of 

brightness and contrast. 

Pictures taken by the 

DIGISECTOR ,u maybe 

saved on disk by C-SEE 3.3 

and then edited by our 

optional MAGIGRAPH, or by COCO MAX or 

GRAPHICOM. This versatile new software is 

in both DIGISECTORS™. 

DS-69B and C-SEE 3.3 
DS-69 and C-SEE 3.3 




included 

$149.95 
$ 99.95 



TRADE IN YOUR OLD DIGISECTOR"" 

If you already have one of The Micro Works' DS-69 or 
DS-69A DIGISECTORS™, you may return it to us and 
we will upgrade your unit to a DS-69B. 



UPGRADE DS-69A to DS-69B 
UPGRADE DS-69 to DS-69B 



$49.95 
$69.95 



The DS-69B comes with a one year warranty. Cameras 
and other accessories are available from The Micro 
Works. 

NO RISK GUARANTEE 

If you are not completely satisfied with the performance of your new 
DS-69B, you may return it, undamaged, within ten days for a full 
refund of the purchase price. We'll even pay the return shipping. If 
you can get any of our competitors to give you the same guarantee, 
buy both and return the one you don't like. We know which one 
you'll keep. 






Terms: Visa, Mastercard, Check or C.O.D. 



Purveyors of Fine Video Digitizers Since 1977. ^©[r^^ 3 



P.O. Box 1110 Del Mar, CA 92014 (619) 942-2400 




EDUCATION 



Refresh your Roman 
numeral skills by . . . 



Counting 

With 

Caesar 



By Thomas Hood 



For formality, decoration and distinctiveness, 
nothing beats Roman numerals. Romans pro- 
vides an opportunity to develop and refresh skill 
in using them. It converts the numerals from Arabic to 
Roman and vice versa, and also has a drill option. 

The standard short form is assumed in the program. 
For example, 40 must be represented by XL and not by 

xxxx. 

The level of difficulty in the drill option may be 
controlled by altering the value of the number in Line 
630. A beginner might be best served by a low value, say 
17, which can be increased as the numerals are mastered, 
but this number cannot exceed 3,999. 

Tom Hood likes to use the Color Computer in his 
avocation of cryptanalysis. He lives in Dover, North 
Carolina and designs programs for his niece and nephew. 



If the CLEAR key is pressed by mistake, press ENTER 
to recover the prompt. 



y^ 




<sL^ 210 168 

Y 420 213 

660 30 

I END 82 






lp REM romans xv march mcmlxxxvi 


2p DATAl,I,5,V,lj3,X,5j2f,L,lpp,C,5 
0j3,D,lj8j30,M 

30 FORI=0TO6:READV(I) ,D$(I) :NEXT 

40 GOTO800 'menu 

50 PRINT" (ENTER AN § FOR MAIN 



172 



THE RAINBOW April 1987 



MENU) " : PRINT : RETURN 


470 NEXTC 


60 REM arabic — >roman 


4 80 PRINT"' ";C$;" 1 ";" IS NOT A R 


70 CLS : PRINTTAB ( 8 ) "MAXIMUM=3 999" 


OMAN NUMERAL. ":F=0: RETURN 


80 PRINT :GOSUB50 


490 'eval-chars 


90 LINEINPUT"ARABIC NUMERAL: ";N 


500 IFV2<V1 THENRN=RN-V2 ELSERN= 


$ : IFN$=" "THENSOUND100 , 1 : GOTO90 


RN+V2 


100 IFN$="§"THENRETURN 


510 V1=V2 


110 F=1:LL=LEN(N$) 


520 NEXTI 


120 F0RI=1T0 LL:J$=MID$(N$,I,1) 


530 RETURN 


130 IFJ$<"0"OR J$>"9"THENF=0:I=L 


540 'validate-rn$ 


L 


550 IFRN<1 OR RN>3999 THENG0SUB5 


140 NEXT:IFF=0 THENPRINT" DIGITS 


80 : RETURN 


ONLY, PLEASE . " : SOUND100 , 1 : GOTO90 


560 N=RN:GOSUB190:IFRN$<>R$THEN: 


150 N=VAL(N$) :IFN<1 OR N>3999 TH 


GOSUB580: RETURN 


ENPRINT"OUT OF RANGE. ": SOUND100 , 


570 RETURN 


l:GOTO90 


580 SOUND100,1:PRINT"THIS IS NOT 


160 GOSUB190 'get-r$ 


STANDARD FORM . " : F=0 : RETURN 


170 PRINTR$:GOTO90 


590 REM DRILL 


180 ■ make-roman 


600 CLS : PRINT§12 , "DRILL" : PRINT: G 


190 R$="" 


OSUB50 


200 B=1000:O=6 


610 N=RND ( -TIMER) 


210 IFN>=B THENN=N-B:R$=R$+D$(0) 


620 A=0 


: GOTO 2 10 


630 ANS=RND(3 999) :REM ans range 


2 20 IFN=0THENRETURN 


640 A=(A=0) :IFA=0 THEN720 


230 B=B/10: 0=0-2 :IFB>N GOTO230 


650 N=ANS:GOSUB190 


240 C=0 


660 PRINT"ROMAN FOR"ANS"?" 


250 IFN>=B THENN=N-B:C=C+1:G0T02 


670 LINEINPUTRN$ 


50 


680 IFRN$="@"THENRETURN 


260 IFC=9THENR$=R$+D$(0)+D$(0+2) 


690 IFR$ORN$ THENSOUND100,1:GOT 


: GOTO2 90ELSEIFO=5THENR$=R$+D$ (0 


0660 


+1) :C=C-5:IFC=0THEN290 


700 PLAY"V15T1203 L2CL4CCL2DL4GG 


270 IFC=4THENR$=R$+D$(0)+D$(0+1) 


04L2C" 


:GOTO2 90 


710 GOTO630 


280 R$=R$+STRING$(C,D$(0) ) 


720 N=ANS:GOSUB190 


290 IFN>0THEN2 30 


7 30 PRINT"ARABIC FOR "R$"?" 


300 RETURN 


740 LINEINPUTRN$ 


310 REM roman — >arabic 


750 IFRN$="@"THENRETURN 


3 20 CLS : PRINTTAB ( 7 ) "MAXIMUM=MMMC 


760 N=VAL(RN$) : IFNOANS THENSOUN 


MXCIX": PRINT 


D100,1:GOTO7 30 


3 30 GOSUB50 


770 PLAY"V15T803 L4D+FL2F+FD+" 


340 LINE INPUT "ROMAN NUMERAL: » ;R 


780 GOTO630 


N$ 


790 'menu 


350 IFRN$=""THENSOUND100,1:GOTO3 

40 

360 IFRN$="@"THENRETURN 


800 CLS0: PRINTS 41, "ROMAN NUMERAL 

S" ; 

810 PRINT@32*5,"1. ARABIC TO ROM 


370 F=1:GOSUB420:IFF=0THEN340 'e 


AN"; 


val-rn$ 


820 PRINT§32*7,"2. ROMAN TO ARAB 


380 GOSUB550:IFF=0THEN3 40 'valid 


IC" ; 


ate-rn$ 


830 PRINT@32*9,"3. DRILL"; 


390 PRINTRN 


840 PRINT§32*11,"4. END"; 


400 GOTO340 


8 50 PRINT@32*15, "PRESS A NUMBER" 


410 ■ eval-rn$ 


/ 


420 RN=0:V1=0 


860 K$=INKEY$:IFK$=""THEN860 


430 FORI=LEN(RN$)TO 1 STEP-1 


870 ONVAL(K$)GOSUB70,320,600,880 


440 C$=MID$(RN$,I,1) 


:GOTO800 


450 FORC=0TO6 


880 CLS : PRINTS 3 2*8+6, "ROMAN NUME 


460 IFC$=D$(C)THENV2=V(C) :GOTO50 


RALS ENDED":PRINT@3 2*13,"":END:R 





ETURN /55\ 
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Spreadsheets 
have never been 
so simple 



• 9 



Plottin and Plannin 



By BUI Reed 



When I first saw a BASIC spread- 
sheet program and put it on 
my computer, I really liked 
it, but there were a lot of features I 
wanted in a spreadsheet program that 
this one didn't have. The program was 
written in a way that made changes 
difficult, if not impossible, so I decided 
to write my own spreadsheet program. 

Cheap Spread is written in a modular 
style, so that the program is broken 
down into small, manageable blocks 
which can be easily changed. When I 
first wrote it, 1 wrote "program stubs" 
for the parts not yet written. In this way 
I could check out the program as I wrote 
new subroutines. This also makes it easy 
to replace subroutines or add new ones. 

There are messages throughout this 
program to inform you of an error in 
the command name operands, and even 
to tell you of errors in setting up func- 
tions. But not all messages are for 
errors. Some are for requesting more 
information, such as how many rows 
and columns of the spreadsheet to print. 
These messages help the program to be 
user-friendly. 

I wrote an INKEYS subroutine to 
control data input for at least two 
reasons. First, this prevents you from 



Bill Reed is a systems analyst for a large 
manufacturing firm in Lavergne, Ten- 
nessee. His hobbies include camping 
and other outdoor activities. 



entering too much data in cells; you are 
limited to only nine characters. If you 
enter more than that, it is written over 
by the next cell or wraps around to the 
next line. Second, it prevents a line feed 
after you press enter, which you get 
with the INPUT command in BASIC. This 
can be especially annoying on the last 
line of a screen when it causes the entire 
screen to scroll up a line. You may use 
any key to enter data. Backspace works 
as normal, SHlFT-backspace backs up to 
the beginning of a field, and the right 
arrow works the same as pressing the 
space bar. The INKEYS routine controls 
cursor movement so that you do not 
enter more data than is allowed, and it 
prevents backspacing past the begin- 
ning of a field. 

Statements preceding the GDSUB to 
the INKEYS subroutine set the length of 
the field (LN), whether you can enter any 
key or numeric keys only (TYS), and the 
start position for entering data (S9). 
The INKEYS subroutine calculates the 
end position, and checks it to make sure 
that you do not enter data past it. The 
statement after the GOSUB moves the 
temporary variable C9S to the actual 
value you want to save. For a numeric 
field, the variable C9 is used. 

Sometimes the program seems to be 
hung up when it does not respond to a 
keypress, but it is only stopping to clear 
more space for strings. This is known as 
"garbage collection." This occurs more 
frequently using a large spreadsheet, 
but not so often as to be a problem. 
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Starting Out 

When you first start the program, you 
are asked if you want to create or load 
a spreadsheet. If you create a spread- 
sheet, you are then asked to enter the 
number of rows and columns. Pressing 
ENTER at these points gives the defaults 
of 40 rows and 14 columns. This is 
about the maximum number of cells 
that you can use. 1 set the default to 14 
columns so you can have a column for 
titles, 12 months of data and a totals 
column. I frequently use this spread- 
sheet program for doing my monthly 
budget and it works out very well. 

"Expressions . . . 
are evaluated in 
algebraic 
notation, " 

If you load a spreadsheet you are 
asked the name of the spreadsheet file. 
If you do not enter an extension on the 
filename, the program automatically 
adds /DAT to the filename. 

Cells are referred to by the row 
number, followed by a comma or a 
dash, then the column number. Func- 
tions entered for a cell are evaluated in 
algebraic notation. That is, exponenti- 
ation is done first, followed by multipli- 
cation and division, then addition and 
subtraction. Parentheses may be used to 
change the order of operations. This 
function evaluation routine works in 
the same way as many higher-level 
language compilers running on main- 
frame computers. 

In evaluating functions, mathemati- 
cal expressions go through a conversion 
process so that they are evaluated in 
algebraic notation. This process uses a 
variable array (V$), and a stack for the 
mathematical operators (Sl<$). The 
stack is used as a holding place for the 
operators while the proper sequence is 
established for them. Then they are 
transferred to the variable array. After 
the entire function is scanned, the 
calculations are done. For example, an 
expression entered as: 

[5,3]+[5,5]*[G,5] 
is converted before calculations to: 

[5,3] [5,5] [6,5] * + 
This format is known as postfix nota- 



tion. Hewlett-Packard calculators use 
this notation. 

The program has room to accommo- 
date up to 10 variables and 10 operators 
per function, as determined by the 
dimension of the array VS. The length 
of the function entered is limited to 30 
characters, but if you need more than 
that, change the length (LN) in the first 
line of the Enter Function subroutine. 

The commands in Cheap Spread 
include the following: 

DAT r,c — Enter the row and column 
for entering data in a cell. 

F r,c — Enter function for a row and 
column. Functions can be entered in 
many formats. The first and easiest is 
Rnl,n2 or Cnl,n2 which specifies row 
or column summation. 'R' takes the 
sum of rows nl through n2. 'C sums 
columns nl through n2. Calculations 
involving cells are referred to by sur- 
rounding the row and column numbers 
by brackets. The left bracket is gener- 
ated using the SHlFT-down arrow, and 
the right bracket by the SHlFT-right 
arrow. You can use any combination of 
cells and constants in functions. For 
example: R2.3; C3-6; [5,3]+[5,4]/[5,5]; 
[5,3]/ [5,4]+ 1; [5,5]; and 3+2*5. 

V r,c — View function at row and 
column specified. It is not necessary for 
the cell to be on the screen. 

VF — View all the functions defined 
on the screen. Instead of data being 
displayed, functions are displayed. 

I r,c — Increment a cell. You are 
asked to enter the amount that you want 
to add to the value already in the cell. 

D r,c — Decrement a cell. You are 
asked to enter the amount that you want 
to subtract from the value already in the 
cell. 

CC cl-c2 — Copy column of data 
from cl to c2. The first column must be 
on the screen, but the second column 
specified need not be on the screen. 

CR rl-r2 — Copy rows of data from 
rl to r2. The first row must be on the 
screen, but the second row need not be 
on the screen. 

H — Displays a help screen. Pressing 
any key returns you to the same point 
in the spreadsheet. 

P — Sends the spreadsheet to the 
printer. If you select standard size print, 
the maximum number of columns you 
may specify is eight. The maximum 
number of columns is not checked for 
narrow print, but if you use the default 
size spreadsheet, you should not have 
any problem. 



SPREAD r,c — Takes the value in a 
cell and spreads it to one or more 
columns. You may enter a whole 
number between I and the maximum 
number of columns. The starting cell 
will be divided by this number, and the 
result will be put into the number of 
cells specified. You may also enter a 
number between .001 and 1, and this 
will divide the value in the cell by the 
fractional amount and put the result in 
just that one cell. You can use this to 
double the value in a cell by entering .5 
as the number of columns to spread. 

U — Updates the spreadsheet. Up- 
dating is done a column at a time, 
starting at the first column on the left. 
If you have formulas that depend on a 
value in a higher numbered row in the 
same column, you may need to update 
the spreadsheet more than once to 
obtain correct results. 

ERASE — Clears all data and func- 
tions. You are asked what row and 
column on which to start erasing. This 
is done so you can leave your row and 
column headings on the spreadsheet. 

CLRD — Clears all data from the 
spreadsheet, leaving all the functions 
intact. 

J r,c — Jump to specified row and 
column. This puts the specified row and 
column in the upper left corner of your 
screen. This is especially useful for 
jumping to the first column to see what 
the title for a particular row is, and then 
jumping back. 

S — Save spreadsheet. You are asked 
if you want to replace the existing 
spreadsheet or save a new one. When 
saving a new spreadsheet, if you leave 
off the file extension, the program will 
automatically add 'DAT to the file 
name. Data is saved in the following 
manner: First, the number of rows and 
columns are written to the file. Then, all 
the data in the cells are written out one 
column at a time, starting with the first 
column. Finally, all the functions are 
written out one column at a time, 
starting with the first column. 

The printer options in Cheap Spread 
are for an Okidata printer. If you have 
a different printer, you may need to 
refer to your printer manual for correct 
control codes for standard and narrow 
print. The variable that has the control 
code for printing is SZS. The baud rate 
for printing is set for 1200 baud. If your 
printer baud rate is different, either 
delete or change the POKE 150, 41 in 
the initialization subroutine. □ 
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\rS 52C 



200 . 
520 . 
770 . 
1590 
2110 
3040 
4525 



"el 6530 211 12520. 

'245 7090 236 13650. 

.201 
.173 
.155 
.38 



7660 212 14540. 

8170 190 15530 . 

9040 238 16060. 

10590 29 END.. 



.138 
.190 
.217 
.151 
.163 
.173 



The listing: SPREAD 



10 CLEAR 7000 

20 PMODE0 , 1 : PCLEAR 1 

30 GOSUB 

40 GOSUB 

50 GOSUB 

60 GOSUB 

70 GOSUB 

80 IF ER$<>"" 

TO 60 : ' ERROR 

90 IF CN>9 THEN 

100 GOSUB 2500: 



500: 'INITIALIZE 
8000: 'HELP SCREEN 
10000 :' DISPLAY SCREEN 
1000 : ' ENTER DATA 
2000 : ' CHECK COMMAND 

THEN GOSUB 9 500: GO 



160 
■VALID 



ROW AND DE 



LIMITER? 

110 IF ER$<>"" THEN GOSUB 9500 :G 

OTO 60 : ' ERROR 

120 GOSUB 3000:' VALID COLUMN? 

130 IF ER$<>"" THEN GOSUB 9 500 :G 



Two-Liner Contest Winner . . . 

This Two-Liner creates cassette index cards on your 
printer. Just type it in, run it and answer the prompt 
for the number of cards you desire. Then just fold the 
printout on the dotted lines and fill it in. 

The listing: 

1 CLS: INPUT "HOW MANY CARDS" ;D:FO 

RA=lTOD:Z$=" 

ii . print#-2 , Z 

$:PRINT#-2,":SIDE 1; 

: SIDE 2 ; " : FORX=lT014 : PRINT#-2 , " : 

: " : NEXTX: PRINT#-2 , Z$ : PRINT 
#-2 , » : TITLE ; " : PRINT#-2 , " : " 

2 PRINT#-2 , Z$ : PRINT#-2 , " : NOTES ; " 

:FOR X=lT04:PRINT#-2,": 

• ii • 

NEXTX : PRINT#-2 , Z$ : NEXTA 



Keith Selbee 
Akron, OH 

(For this winning iwo-lincr contest entry, the author has been sent copies of 
both The Second Rainbow Book of Simulations and its companion The Second 
Rainbow Simulations Tape-) 



OTO 60 : ■ ERROR 

140 IF CN<6 OR CN=8 OR CN=9 THEN 

GOSUB 3 500:' IS CELL ON SCREEN? 
150 IF ER$<>"" THEN GOSUB 9500:G 
OTO 60 : i ERROR 

160 IF CN=1 THEN GOSUB 4000: ' ENT 
ER DATA 

170 IF CN=2 THEN GOSUB 4500:GOSU 
B 10000 : ' ENTER FUNCTION 
180 IF CN=3 THEN GOSUB 12500 : GOS 
UB 10000 : ' INCREMENT CELL 
190 IF CN=4 THEN GOSUB 13000: GOS 
UB 10000 : ■ DECREMENT CELL 
200 IF CN=5 THEN GOSUB 9000:GOSU 
B 10000 : ' SPREAD FIGURES 
210 IF CN=6 THEN GOSUB 5000:' VIE 
W FUNCTION 

2 20 IF CN=7 THEN GOSUB 11000: GOS 
UB 10000: 'MOVE WINDOW 
2 30 IF CN=8 THEN GOSUB 5500:GOSU 
B 10000 : ' COPY ROWS 

240 IF CN=9 THEN GOSUB 6000 : GOSU 
B 10000 : ■ COPY COLUMNS 
250 IF CN=10 THEN GOSUB 6500: 'PR 
INT SPREADSHEET 

260 IF CN=11 THEN GOSUB 7500: ' SA 
VE SPREADSHEET 

270 IF CN=12 THEN GOSUB 8000 : GOS 
UB 10000: 'HELP SCREEN 
2 80 IF CN=13 OR CN=14 THEN GOSUB 

8500 : GOSUB 10000 : ' CLR DATA/ ALL 

2 90 IF CN=15 THEN GOSUB 11500: GO 
SUB 10000: 'UPDATE SPREADSHEET 
300 IF CN=16 THEN GOSUB 16500: 'V 
IEW FUNCTIONS ON SCREEN 

310 IF CN<>17 THEN 60 

3 20 PRINT@3 2, "QUIT. ARE YOU SURE 
(Y/N) ";: INPUT YN$:IF YN$o"Y" TH 
EN 60 

330 END 



See You at 
RAINBOWfest — Chicago 

April 10-12 
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500 '*****INITIALIZATIONS***** 


1030 S9=2:LN=30: GOSUB 1500:IP$=C 


510 CUR$=CHR$ (175) : POKE 150,41 


9$: 'INKEY$ INPUT 


520 BD$=CHR$(150) 


1040 RETURN 


530 DC=1:DR=1 


1500 '**INKEY$ INPUT ROUTINE*** 


540 NM$="0123456789.":OP$=" A */-+ 


1510 PS=S9:E9=S9+LN:C9$=" 11 


0" 


1520 PRINT § PS, CUR$; 


550 Vl$="0123456789. A */+-[] ()" 


1530 C8$=INKEY$:IF C8$=' ,n THEN 1 


560 FOR 1=1 TO 6 


530 ELSE C8=ASC(C8$) 


570 READ P1(I) ,P2(I) 


1540 IF C8=8 OR C8=9 OR C8=13 OR 


580 NEXT I 


C8=21 OR C8>31 THEN 1550 ELSE 1 


590 DATA 3,4,2,2,2,2,1,1,1,1,0,4 


530 


600 NC=17:DIM VC$ (NC) , V$ (20) 


1550 IF C8<>13 THEN 1570 


610 FOR 1=1 TO NC 


1560 PRINT@PS," " ; :C9=VAL(C9$) :R 


620 READ VC$(I) 


ETURN 


630 NEXT I 


1570 IF C8<>8 THEN 1612 


640 DATA DAT, F, I, D, SPREAD, V, J,CR 


1580 IF PS=S9 THEN 1530 


,CC,P,S,H, ERASE, CLRD,U,VF,Q 


1590 IF LEN(C9$)>1 THEN C9$=LEFT 


650 CLS4 


$(C9$,LEN(C9$)-1) ELSE C9$="" 


660 BN$=BD$+STRING$(22,32)+BD$ 


1600 PRINT@PS," ";:PS=PS-1 


670 PRINT@32+4,STRING$(24,150) ; 


1610 GOTO 1520 


680 PRINT@2*32+4,BD$+" CHEAP 


1612 IF C8<>21 THEN 1620 


SPREAD "+BD$; 


1614 IF PS=S9 THEN 1530 


690 PRINT@3*32+4,BD$+"A SPREADSH 


1616 C9$= M " : PRINT@S9 , STRING$ (LN+ 


EET PROGRAM "+BD$; 


1,32) ; :PS=S9: GOTO 1520 


700 PRINT@4*32+4,BN$; 


1620 IF C8<>9 THEN 1670 


710 PRINT@5*32+4,BD$+" BY BI 


1630 IF PS=E9 THEN 1530 


LL REED "+BD$; 


1640 PRINT@PS," ";:PS=PS+1 


740 PRINT@6*32+4,STRING$ (24, 150) 


1650 C9$=C9$+" " 


i 


1660 GOTO 1520 


750 PRINT@ll*32+4,"LOAD OR CREAT 


1670 IF PS=E9 THEN 1530 


E (L/C) "; : INPUT LC$ 


1680 IF TY$="N" AND INSTR( "01234 


7 60 IF LC$="L" THEN GOSUB 7000 : G 


56789. +-",C8$)=0 THEN 1530 


OSUB 10000: GOTO 810 


1690 C9$=C9$+C8$ 


770 IF LC$<>"C" THEN 750 


1700 PRINT§PS,C8$; :PS=PS+1 


780 PRINT@13*32+4,"# OF ROWS(DEF 


1710 GOTO 1520 


AULT=40)";: INPUT MR: IF MR=0 THEN 


2000 '******FIND COMMAND******* 


MR=40 


2010 CM$= H " 


790 PRINT@ 14*3 2+4, "# OF COLS(DEF 


2020 'REMOVE BLANKS IN COMMAND 


AULT=14) « ; : INPUT MC: IF MC=0 THEN 


2030 FOR 1=1 TO LEN(IP$) 


MC=14 


2040 IF INSTR(NM$,MID$(IP$,I,1)) 


800 DIM C$(MR,MC) ,FC$(MR,MC) 


>0 THEN 2070 


810 RETURN 


2050 IF MID$(IP$,I,1)<>" " THEN 


1000 i*****ENTER COMMAND******* 


CM$=CM$+MID$ ( IP$ ,1,1) 


1010 PRINT@0,STRING$(64,32) ; 


2060 NEXT I 


1020 PRINT@0,">"; 


2070 11=1 



Come Join Us at 
RAINBOWfest — Chicago 

April 10-12 
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in person 
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2080 FOR 1=1 TO NC 

2090 IF CM$=VC$(I) THEN 2110 

2100 NEXT I 

2 11^ IF I>NC THEN ER$=CM$+" COMM 

AND NOT FOUND" 

212j3 CN=I 

2130 RETURN 

2500 '**VALID ROW & DELIMITER?* 

2510 01$="" 

2520 FOR 1=11 TO LEN(IP$) 

2530 IF INSTR(NM$,MID$(IP$,I,1)) 

>0 THEN 01$=01$+MID$(IP$,I,1) EL 

SE 2550 

2 540 NEXT I 

2550 II=I+1:01=VAL(01$) 

2560 IF LEN(O1$)=0 THEN ER$="OPE 

RAND 1 INVALID OR MISSING" : GOTO 

2 600 

2 570 IF CN<9 AND 01>MR THEN ER$= 

"MAX. NO. OF ROWS IS"+STR$(MR) 

2 580 IF CN=9 AND 01>MC THEN ER$= 

"MAX. NO. OF COLS IS"+STR$ (MC) 

2590 IF MID$(IP$,I,1)<>"-" AND M 

ID$(IP$, 1,1)0"," THEN ER$="DELI 

MITER MUST BE •-' OR ','" 

2 600 RETURN 

3000 '******CHECK COLUMN****** 

3010 02$="" 

3020 FOR 1=11 TO LEN(IP$) 

3030 IF INSTR(NM$,MID$(IP$,I,1) ) 

>0 THEN 02$=02$+MID$(IP$,I,l) EL 

SE 3050 

3040 NEXT I 

3050 II=I:02=VAL(02$) 

3060 IF LEN(O2$)=0 THEN ER$="OPE 

RAND 2 INVALID OR MISSING" : GOTO 

3090 

3070 IF CN<>8 AND 02>MC THEN ER$ 

="MAX. NO. OF COLS IS"+STR$(MC) 

3080 IF CN=8 AND 02>MR THEN ER$= 

"MAX. NO. OF ROWS IS"+STR$(MR) 

3090 RETURN 

3500 ' ***IS CELL ON SCREEN?**** 

3510 IF CN<9 AND (01>DR+13-1 OR 

OKDR) THEN 3550 

3520 IF CN=9 AND (01>DC+3-l OR O 

KDC) THEN 3550 

3530 IF CN<6 AND (02>DC+3-l OR O 

2<DC) THEN 3550 

3540 GOTO 3560 

3550 ER$="CELL(S) NOT ON SCREEN" 

3 560 RETURN 

4000 '***ENTER DATA IN CELL**** 

4010 S9=96+(01-DR+1) *2+(01-DR) *3 

0+(O2-DC)*10:LN=9: GOSUB 1500 :C$( 

01,02)=C9$ 

4020 IF S9=502 THEN GOSUB 10000: 

'REDISPLAY IF SCREEN SCROLLS 



4030 RETURN 

4500 '*****ENTER FUNCTION***** 

4510 S9=3 2:LN=30:GOSUB 1500:FC$( 

01,02)=C9$:IP$=C9$ 

4520 IF IP$="" THEN 4540 

4525 IF LEFT$(IP$,1)="-" THEN FC 

$ (01,02)="" :ER$="ENTER NEG. NO. 

AS 0-NUMBER": GOSUB 9500: GOTO 454 



4530 IF LEFT$(IP$,1)="C" OR LEFT 

$(IP$,1)="R" THEN GOSUB 13500 EL 

SE GOSUB 14000 

4540 RETURN 

5000 '*****VIEW FUNCTION****** 

5010 IF FC$ (01,02)0"" THEN PRIN 

T@32,FC$(01,02) ELSE PRINT@32,"N 

FUNCTION DEFINED"; 

5020 GOSUB 12000:' PRESS ANY KEY 

5030 RETURN 

5500 '*******COPY ROWS******** 

5510 FOR 1=1 TO MC 

5520 C$(02,I)=C$(01,I) 

5530 NEXT I 

5540 RETURN 

6000 '******COPY COLUMNS****** 

6010 FOR 1=1 TO MR 

6020 C$(I,02)=C$(I,01) 

6030 NEXT I 

6040 RETURN 

6500 '****PRINT SPREADSHEET**** 

6510 PRINT@32, "STD PRINT OR NARR 

OW(s/N) "; : INPUT SZ$ 

6520 IF SZ$="N" THEN SZ$=CHR$(29 

) ELSE SZ$=CHR$(30) 

6530 PRINT@32,STRING$(30,32) ; 

6540 PRINT @ 3 2, "ENTER START, END R 

OW"; : INPUT R1,R2 

6550 PRINT§32,STRING$(30,32) ; 

6560 PRINT@32, "ENTER START, END C 

OL"; : INPUT C1,C2 

6570 IF SZ$=CHR$(30) AND C2-C1>8 
THEN ER$="CAN ONLY PRINT 8 COLS 
STD SIZE": GOSUB 9500: GOTO 6660 

6580 ER$="READY PRINTER AND PRES 

5 ANY KEY":GOSUB 9500 
6590 PRINT#-2,SZ$ 
6600 FOR I=R1 TO R2 

6 610 FOR J=C1 TO C2 

6620 PRINT#-2,USING"% %";C 

$(i,J); 

6630 NEXT J 

6640 PRINT#-2,CHR$(13) ; 

6650 NEXT I 

6660 PRINT#-2,CHR$(30) 

6 670 RETURN 

7000 «****LOAD SPREADSHEET**** 

7010 PRINT@13*32+4, "FILENAME: " ; 

: INPUT F$ 
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7020 IF INSTR(F$,"/»)=0 AND INST 


8120 PRINT@11*32+2,"CLRD - CLEA 


R(F$,".")=0 THEN F$=F$+"/DAT" 


R DATA ONLY"; 


7030 0PEN"I",#1,F$ 


8130 PRINT@12*32+2,"H - HELP 


7040 INPUT* 1, MR, MC 


Q - QUIT" 


7050 DIM C$(MR,MC) ,FC$(MR,MC) 


8140 PRINT§13*32+2,"U - UPDATE 


7060 FOR 1=1 TO MR 


S - SAVE"; 


7070 FOR J=l TO MC 


8150 PRINT@14*32+2,"P - PRINT 


7080 INPUT#1,C$(I,J) 


ii • 

i 


7090 NEXT J, I 


8160 PRINT@15*32+9, "PRESS ANY KE 


7100 FOR 1=1 TO MR 


Y"; 


7110 FOR J=l TO MC 


8170 GOSUB 12000 


7120 INPUT#1,FC$(I,J) 


8180 RETURN 


7130 NEXT J, I 


8500 '***CLEAR DATA/ FUNCTION*** 


7140 CLOSE #1 


8510 IF CN=13 THEN PRINT@32 , "CLE 


7150 RETURN 


AR EVERYTHING (Y/N) " ; 


7500 '****SAVE SPREADSHEET**** 


8520 IF CN=14 THEN PRINT@32 , "CLE 


7510 PRINT@32,"NEW FILE/REPL EXI 


AR ALL DATA (Y/N) » ; 


STING (N/R) " ; : INPUT NR$ 


8530 INPUT YN$:IF YN$<>"Y" THEN 


7520 IF NR$="N" THEN PRINT@32,ST 


8620 


RING$(30,32) ; :PRINT@32 , "" ; : INPUT 


8540 PRINTS 3 2, "ENTER START ROW T 


"FILENAME: " ;F$ ELSE IF NR$<>"R" 


CLEAR"; : INPUT S2 


THEN 7510 


8550 PRINT@32,"ENTER START COL T 


7530 IF INSTR(F$ / "/")=0 AND INST 


CLEAR"; : INPUT S3 


R(F$,".")=0 THEN F$=F$+"/DAT" 


8560 FOR I=S2 TO MR 


7540 IF NR$="R" THEN KILL F$ 


8570 FOR J=S3 TO MC 


7550 OPEN"0",#l,F$ 


8580 C$(I,J)="" 


7560 WRITE#1,MR,MC 


8590 IF CN=13 THEN FC$ (I ,J) ="" 


7 570 FOR 1=1 TO MR 


8600 NEXT J 


7580 FOR J=l TO MC 


8610 NEXT I 


7590 WRITE#1,C$(I,J) 


8620 RETURN 


7600 NEXT J, I 


9000 • *****SPREAD FIGURES***** 


7610 FOR 1=1 TO MR 


9010 PRINT@3 2,"HOW MANY COLUMNS" 


7620 FOR J=l TO MC 


; : INPUT CL 


7630 WRITE#1,FC$(I,J) 


9020 IF CL>MC-02+l THEN ER$="MAX 


7640 NEXT J, I 


NO. OF COLUMNS IS"+STR$ (MC-02+1 


7650 CLOSE#l 


): GOSUB 9500: GOTO 9070 


7 660 RETURN 


9030 03=(VAL(C$(01,02) ) )/CL:03=I 


8000 "******HELP SCREEN******* 


NT(O3*100+.5)/100 


8020 CLS: PRINTS 10, "CHEAP SPREAD" 


9040 FOR J=02 TO INT (02+CL+ . 999) 

-1 

9050 C$(01,J)=STR$(03) 


8030 PRINT@2*32+2,"DATx,y- ENTER 


DATA IN CELL"; 


9060 NEXT J 


8040 PRINT@3*32+2,"SPREADx,y-SPR 


9070 RETURN 


EAD AMT TO COLS"; 


9500 «***PRINT ERROR MESSAGES** 


8050 PRINT@4*32+2,"Fx,y - ENTER 


9510 PRINTS 32, ER$; 


FUNCTION IN CELL"; 


9520 ER$="" 


8060 PRINT@5*32+2,"Vx,y OR VF - 


9530 GOSUB 12000 


VIEW FUNC"; 


9540 RETURN 


8070 PRINT@6*32+2,"CCx,y - COPY 


10000 i*****DISPLAY SCREEN***** 


COLUMN" ; 


10010 GOSUB 10500 


8080 PRINT@7*32+2,"CRx,y - COPY 


10020 FOR 1=1 TO 13 


ROW" ; 


10030 FOR J=l TO 3 


8090 PRINT@8*32+2,"IX,y - INCR 


10040 IF J+DC-1>MC THEN 10080 


Dx,y - DECR"; 


10050 IF I+DR-1>MR THEN 10090 


8100 PRINT@9*32+2,"Jx,y - JUMP 


10060 PRINT@96+(I-1)*30+I*2+(J-1 


TO ROW, COL"; 


)*10,C$(I+DR-1,J+DC-1) ; 


8110 PRINT@10*32+2, "ERASE - CLEA 


10070 NEXT J 


R EVERYTHING"; 


10080 NEXT I 
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10090 RETURN 

10500 '***ROW & COL HEADERS*** 

10510 CLS 

10520 FOR 1=1 TO 3 

10530 PRINT@66+(I-1)*10,DC+I-1; 

10540 NEXT I 

10550 FOR 1=1088 TO 1119 

10560 IF PEEK(I)>63 THEN POKE I, 

PEEK(I)-64 

10570 NEXT I 

10580 FOR 1=1 TO 13 

10590 PRINT@64+(I*32) ,RIGHT$(STR 

$(I+DR-1) ,2) ; 

10600 NEXT I 

10610 FOR 1=1120 TO 1504 STEP 32 

10620 IF PEEK(I)>63 THEN POKE I, 

PEEK(I)-64 

10630 IF PEEK(I+1)>63 THEN POKE 

I+l,PEEK(I+l)-64 

10640 NEXT I 

10650 RETURN 

11000 '*****MOVE WINDOW****** 

11010 DR=01:DC=02: RETURN 

11500 '***UPDATE SPREADSHEET*** 

11510 PRINT@32 /'UPDATING. . ."; 

11520 FOR Cl=l TO MC 

11530 FOR Rl=l TO MR 

11540 IF FC$(R1,C1)="" THEN 1156 

P 

11550 IP$=FC$(R1,C1) :01=R1:02=C1 

:GOSUB 4530 

11560 NEXT R1,C1 

11570 RETURN 

12000 '*****PRESS ANY KEY****** 

12010 I$=INKEY$:IF I$="» THEN 12 

010 

12020 RETURN 

12500 '*****INCREMENT CELL***** 

12510 PRINT§3 2, M ENTER INCREMENT" 

; : INPUT IX 

12520 03=VAL(C$ (01,02) ) +IX 

12530 C$(01,02)=STR$(O3) 

12540 RETURN 

13000 ' *****DECREMENT CELL***** 

13010 PRINT@3 2,"ENTER DECREMENT" 

; : INPUT DX 

13020 03=VAL(C$ (01,02) ) -DX 

13030 C$(01,02)=STR$(03) 

13040 RETURN 

13500 '**SUM ROWS OR COLUMNS** 

13510 03=01:04=02 

13520 II=2:G0SUB 2500 

13530 IF LEFT$(IP$,1)="C" AND 01 

>MC THEN ER$="MAX. NO. OF COLS I 

S";STR$(MC) ELSE ER$="" 

13540 IF ER$<>"" THEN GOSUB 9500 

:GOTO 13700 



13550 GOSUB 3000 

13560 IF LEFT$(IP$,1)="R" AND 02 

>MR THEN ER$="MAX. NO. OF ROWS I 

S";STR$(MR) ELSE ER$="" 

13570 IF ER$<>"" THEN GOSUB 9500 

:GOTO 13700 

13580 VL=0 

13590 IF LEFT$(IP$,1)="C" THEN 1 

3600 ELSE 13650 

13600 '*****SUM COLUMNS***** 

13 610 FOR 1=01 TO 02 

13620 VL=VL+VAL(C$(03,I) ) 

13630 NEXT I 

13640 GOTO 13690 

13650 • *****SUM ROWS******** 

13660 FOR 1=01 TO 02 

13 670 VL=VL+VAL(C$(I,04) ) 

13680 NEXT I 

13690 C$(03,04)=STR$(VL) 

13700 RETURN 

14000 '**BREAK DOWN FUNCTION*** 

14010 VN=0:TS=0:SK$= M " 

14020 FOR 1=1 TO LEN(IP$) 

14030 I9$=MID$(IP$,I,1) 

14040 IF 19$=" [" THEN GOSUB 1450 
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0:GOTO 14070 

14050 IF INSTR(NM$,I9$)>0 THEN G 

OSUB 15000: GOTO 14070 

14,06)3 IF INSTR(OP$,I9$)>0 THEN G 

OSUB 15500 

14070 IF ER$<>"" THEN GOSUB 9500 

:GOTO 14120 

14080 IF INSTR(V1$,I9$)=0 THEN E 

R$=" INVALID CHARACTER": GOSUB 9 50 

0:GOTO 1412)3 

1409)3 NEXT I 

14100 IF TS>0 THEN GOSUB 15500 

14110 GOSUB 16000:'EVAL FUNCT 

14120 RETURN 

14500 ■ *****EVALUATE CELL****** 

14510 03$= , »":04$=" , » 

14520 1=1+1 

14530 IF I>LEN(IP$) THEN 14610 

14540 I9$=MID$(IP$,I,1) 

14550 IF INSTR(NM$,I9$)>0 THEN 

3$=03$+I9$:I=I+l:GOTO 14530 

14560 IF I9$<>"-" AND I9$<>"," T 

HEN ER$="DELIMITER MUST BE '-' 

R ' , '" :GOTO 14 660 

14570 1=1+1 

14580 IF I>LEN(IP$) THEN 14610 

14590 I9$=MID$(IP$,I,1) 

14 600 IF INSTR(NM$,I9$)>0 THEN 

4$=04$+I9$:I=I+l:GOTO 14580 

14610 IF I9$<>"]" THEN ER$="MISS 

ING RIGHT BRACKET" : GOTO 14660 

14620 03=VAL(03$) :04=VAL(04$) 

14630 IF 03>MR THEN ER$="MAX. NO 

. OF ROWS IS"+STR$(MR) 

14640 IF 04>MC THEN ER$="MAX. NO 

. OF COLS IS"+STR$(MC) 

14 650 IF ER$="" THEN VN=VN+1:V$( 

VN)=C$ (03,04) : IF V$(VN)="" THEN 

V$(VN)=" " 

14660 RETURN 

15000 '****EVALUATE CONSTANT*** 

15010 N9$="" 

15020 IF I>LEN(IP$) THEN 15050 

15030 I9$=MID$(IP$,I,1) 

15040 IF INSTR(NM$,I9$)>0 THEN N 

9$=N9$+I9$:I=I+l:GOTO 15020 

15050 VN=VN+1:V$(VN)=N9$: 1=1-1 

15060 RETURN 

15500 '**PUSH/POP OPER STACK*** 

15510 IF 19$=")" THEN 15520 ELSE 

15610 
15520 IF TS=0 THEN ER$="MISSING 
LEFT PARENTHESIS": GOTO 15680 
15530 TM$=MID$(SK$,TS,1) 
15540 IF TM$="(" THEN 15550 ELSE 

15570 
15550 TS=TS-1:IF TS=0 THEN SK$=" 
" ELSE SK$=LEFT$(SK$,TS) 



15560 GOTO 15680 

15570 VN=VN+1:V$(VN)=TM$ 

15580 TS=TS-1:IF TS=0 THEN SK$=" 

" ELSE SK$=LEFT$(SK$,TS) :G0T0155 

20 

15600 '***PUT ON STACK?******* 

15610 IF TS=0 THEN 15670 

15620 TM$=MID$(SK$,TS,1) 

15630 IF P1(INSTR(0P$,TM$) )<P2(I 

NSTR(0P$,I9$) ) THEN 15670 

15640 VN=VN+1:V$(VN)=TM$ 

15650 TS=TS-1:IF TS=0 THEN SK$=" 

" ELSE SK$=LEFT$(SK$,TS) 

15660 GOTO 15610 

15670 TS=TS+1:SK$=SK$+I9$ 

15680 RETURN 

16000 '****EVAL IN POSTFIX**** 

16010 1=1 

16020 IF VN=1 THEN 16170 

16030 TM$=LEFT$(V$(I) ,1) 

16040 IF INSTR(OP$,TM$)=0 THEN I 

=1+1: GOTO 16030 

16050 IF VAL(V$(I))<>0 THEN 1=1+ 

1:G0T0 16030: 'NUMBER 

16060 IF TM$=" A " THEN V$(I-2)=ST 

R$(VAL(V$(I-2)) A VAL(V$(I-1)) ) 

16070 IF TM$="*" THEN V$(I-2)=ST 

R$(VAL(V$(I-2) )*VAL(V$(I-1) ) ) 

16080 IF TM$="/" THEN IF VAL(V$( 

I-1))<>0 THEN V$(I-2)=STR$(VAL(V 

$(1-2) )/VAL(V$(I-l) ) ) ELSE V$(I- 

2)="0" 

16090 IF TM$="+" THEN V$(I-2)=ST 

R$(VAL(V$(I-2) )+VAL(V$(I-l) ) ) 

16100 IF TM$="-" THEN V$(I-2)=ST 

R$(VAL(V$(I-2))-VAL(V$(I-l)) ) 

16110 IF I+1>VN THEN 16170 

16120 FOR J=I+1 TO VN 

16130 V$(J-2)=V$(J) 

16140 NEXT J 

16150 VN=VN-2 

16160 GOTO 16010 

16170 IF LEN(V$(1))>9 THEN V$(l) 

=LEFT$(V$(1) ,9) 

16180 C$(01,02)=V$(1) 

16190 RETURN 

16500 ■ **VIEW SCREEN OF FUNC*** 

16510 GOSUB 10500 

16520 FOR 1=1 TO 13 

16530 FOR J=l TO 3 

16540 IF I+DR-1>MR THEN 16580 

16550 XX$=FC$(I+DR-1,J+DC-1) : IF 

LEN(XX$)>9 THEN XX$=LEFT$ (XX$ , 9) 

16560 PRINT@96+(I-1)*30+I*2+(J-1 

)*10,XX$; 

16570 NEXT J 

16580 NEXT I 

16590 RETURN ^ 
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In conjunction with the rainbow's Scoreboard, we offer this column 
of pointers for our game-playing readers' benefit. If you have some 
interesting hints, tips or responses to questions, or want help yourself, 
Vwe encourage you to write to the Scoreboard, c/o the rainbow. 



FEEDBACK 

Scoreboard: 

Attention Erick Molnar: Yes, there are 
other exits from Bedlam'. If the dog doesn't 
die, SEARCH each room until you find one 
with a painted door or a secret door. If the 
door is painted, OPEN PRINTED DOOR. If it's 
a secret door, bring Napoleon into the 
room (NAPOLEON FOLLOW ME) then have 
NAPOLEON OPEN SECRET DOOR. 

To help Dale Lampe in Pyramid 2000: 
After you GET DIAMONDS, go North, West 
and GET COINS. 

Belie A. Hatcher 
Apple Valley, CA 

Fill It to the Rim 

Scoreboard: 

Here is some information for Mark 
Bourdeaux about the slick in Hall of 
Kings. First you need to gel the bucket and 
candle stub. Put the candle in the bucket; 
this stops up the hole in the bucket. Then 
go to the kitchen and fill the bucket with 
the water. After that, go to the pool and 
fill it with the water. 

Arte M oiler 
Kensington, MD 

Underground Trick 

Scoreboard: 

For Joseph J. McElheny: Enlist the aid 
of the camel in Sands of Egypt, he knows 
just where to go. You don't enter the 
pyramid in the obvious way; an under- 
ground tunnel would be just the trick. 

James K. Knight 
Marysville, WA 

Cross Over the Bridge 

Scoreboard: 

Here are Trekboer tips for David Mer- 
kel. Tie the rope west of the bridge, then 
cross the bridge. Carry only three light 
objects, or you will die. Don't worry if the 
bridge collapses after you cross it. Hint: 
Spiders don't survive when in antimatter 
chambers. 

How can 1 find a way to drink water in 
Sands of Egypt! 

Luis Torres 
Lima, Peru 



Polarized 

Scoreboard: 

In answer to Sherry Moore's question 
about Pyramid 2000, you have to go North 
and South a lot in the maze. At a certain 
time (most likely after going North) go 
East — you will be at the brink of a pit. 
Go East and then Northwest. (The chest 
will not be there if the mummy has not 
taken two of your treasures.) The block 
cannot be moved, but is simply an obsta- 
cle. 

James Pede 

VORTEX FACTOR 

Scoreboard: 

In Vortex Factor, how do you get past 
Cairo Moon 2? What's behind the book- 
case? How do you get through north 
doors? 

Tom Rawlinson 
Toronto. Ontario 

Darkest Cairo 

Scoreboard: 

In Vortex Factor, when I go to Cairo, 
it says it is too dark to see. If 1 try to move 
it says 1 fall and hit my head, which ends 
the game. 

Chris Sparks 
Nicoma Park. OK 

Scoreboard: 

How do you open the door that seems 

impossible and get past the gate in the 

basement of the castle in Vortex Factor"! 

Steve Adler and Bobby Limoges 

Montreal, Quebec 



Scoreboard: 

In The Vortex Factor, I have figured out 
you need to make a candle to move around 
on Cairo, but when I go into the dungeon 
to get the string the door slams shut and 
I can't get back out. 

A hint for Calixto Island: Be sure to take 
the air pump with you when you go to the 
island. 

John Riddle 
Linthicum. MD 



Scoreboard: 

How do you open the bank in Vortex 
Factor! 

Eric Tabor 
Chicago, IL 

CRYSTAL CASTLES 

Scoreboard: 

On the CoCo 1 or 2, if you die once then 
go into the door on the first screen on 
Crystal Castles, you will be transported to 
a high level and get 140,000 points. On the 
CoCo 3, doing the same (no need to die 
once) you will get 490,000 points and be 
transported to an even higher level. 

In Dallas Quest, how do you get past the 
snake on the path? 

Marc Reiter 
Cincinnati, OH 

Scoreboard: 

On the first screen of Crystal Castles, go 
into the door and jump. You will warp to 
a high level. Every time you use up all your 
bears, start a new game and go into the 
door and jump. You will be on the level 
right before the one you died on. 

Jared Brookes 
Calgary. Alberta 



DUNGEONS OF DA GGORA TH 

Scoreboard: 

In Dungeons of Daggorath, on the first 
level, put everything on the ground (with 
the exception of the leather shield), wait 
for a spider to come up, and let it sit there 
(two or three hours works best.) When you 
come back, all the monsters should be 
backed up waiting in line for you (it is 
much easier to kill all of the monsters this 
way). 

Billy Foster 
Fayetteville, NC 

Ring and Run! 

Scoreboard: 

To destroy the image of the wizard in 
Dungeons of Daggorath, you must set 
down one of almost everything (sword, 
flask, shield, etc.). When it comes, attack 
it with a ring and run all the way down the 
corridor. 
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On the second board of Zaxxon, put 
your ship so it shoots into the corner. Then 
put it at the third height on your altitude 
meter. This will get you 1000 point bonus 
every time. 

In Raaku-Tu, after you've killed the 
serpent at the blood-stained altar, get the 
golden idol. It will give you five points. 

Frank Morrison 
Mercer Island. WA 

Smiling Blobs? 

Scoreboard: 

How do you get past the smiling blobs 
in Dungeons of Daggorath besides enter- 
ing MOVE? How do you kill the blobs? 

Chris Ravenell 
Queens, NY 



Scoreboard: 

In Dungeons of Daggorath, when you 
kill the Wizard image, can you gel the 
scroll he lays? 

Larrv Lockwood 
Pine Bluff, AR 

BEDLAM 

Scoreboard: 

Here is a Bedlam hint: If a doctor ever 
gives you a shot, type PLUGH — then you 
will be better and better. 

Danny Buchanan 
Tucson, AZ 

Scoreboard: 

In Bedlam, I cannot open the cabinet or 
the red doors. 

In Pirate's Adventures, the keys are 
under the nailed rug and the parrot kills 
the snakes. 

Jason Jones 
St. Pauls. NC 

Scoreboard: 

1 need specific instructions on how to get 
the keys from the cabinet and the room 
with the nurse in it, in Bedlam. 

Scott Nagle 
Danbury. CT 

DALLAS QUEST 

Scoreboard: 

In Dallas Quest, I have been on the plane 
and seen the monkey. I haven't been able 
to get out of the jungle. 

Gregg Thompson 
Chesterfield, VA 

Scoreboard: 

How do you get past the cannibals and 
into the cave in Dallas Quest! 

Jason Mulig 
Ragley. LA 



On An Egg Hunt 

Scoreboard: 

I can't figure out a way to get past the 
spider because I can't find the eggs in 
Dallas Quest. 

Also, in Sands of Egypt, I can't find the 
scepter everybody keeps talking about. 

Chris O'Neal 
Terre Haute, IN 

Scoreboard: 

The command that must be used at the 
cave entrance in Dallas Quest is the com- 
mand used to make Roger the elephant 
cooperate at Dumbo's nest. 

In Sands of Egypt, where is the con- 
tainer? Is the snake oil useful? 

Rodrigo Maldonado 
Whittier, CA 

GOLD RUNNER GUIDANCE 

Scoreboard: 

A helpful tip for the game Gold Runner: 
When too many "men" are too close to 
you, put a hole in the bricks just before a 
ladder. The men will be forced to go up or 
down, which gives you a chance to run. Is 
there any way to start at a different level 
besides Level I in Gold Runner? 

Tony Fortino 
Tacoma, WA 

Scoreboard: 

Level 19 of Gold Runner has me 
stumped. How do you get the last gold bar 
and manage to escape the blue level in 
order to be free to reach the ladder at the 
top of the screen? 

Barbara Williams 
Fort Madison, IA 

SIFTING THROUGH 
THE SA NDS OF EG YPT 

Scoreboard: 

In Sands of Egypt, I have the scepter 
(needed to open the pool drain) but I don't 
know what to type for it to open. 

Omri Goren 
Reseda, CA 



Scoreboard: 

In The Sands of Egypt, I am in the inner 
chamber underground. I translated the 
hieroglyphics and returned the scepter 
before I went underground again. I can't 
find any treasure. Also, how do you get out 
of the boat and up through the hole in the 
roof? 

In Pyramid, I get the coins but the 
mummy always takes them before I get to 
the maze. I can't get past the serpent. 

Phil Derksen 
Hendersonville, NC 



Go to Restroom? 

Scoreboard: 

What do you do at the oasis, other than 
drink, in Sands of Egypt'] What items am 
I supposed to have (especially at the start 
of the game before the cliff)? 

Jeff Haase 
Timmins. Ontario 

Scoreboard: 

When Sands of Egypt first starts out, go 
North until you get to the cliff. Go West 
twice, get shovel. Go North twice, kill the 
snake. 

Curtis Schaaf 
Mora, 1L 

Snake Oil, Anyone? 

Scoreboard: 

Some assorted tips: In Sands of Egypt, 
get the snake oil into the canteen and 
return to the pool. 

In Bedlam, to get the keys you will need 
to use the window hook. 

In Pyramid 2000, to get past the serpent, 
THROW the statue at it. 

In Raaku-Tu, how do you get past the 
gargoyle? 

Philip Manwarren 
Harrington, ME 

Scoreboard: 

In Sands of Egypt. I can get to the 
treasure room and gel the ladder; what 
next? 

Also, in Dragon Blade, I cannot figure 
out how to open the stone door. 

David Boyd 
Kenosha, Wi 

Scoreboard: 

In Dragon Blade, if you fall into the 
mine, do you need to get something? If so, 
how do you get it? How do you gel out of 
the mine? 

David Hunt 
Gaithersburg, MD 



PYRAMID PARTICULARS 

Scoreboard: 

In Pyramid 2000 1 need to know how to 
get to the vending machine. In Sands of 
Egypt I need to know how to drain the 
pool, where the oil is to free the scepter, 
and how to enter the pyramid. 

John Wood 
Maroa, IL 

Scoreboard: 

Here are a couple of Pyramid hints: 
When you get to the chamber that has steps 
leading up a dome, go South. You will 
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enter a room with some gold. Get the gold 
and go North, then West to the Bottomless 
pit. 

Danny Flores 
Louisville, KY 

Scoreboard: 

In Pyramid 2000, 1 can't get past the 
serpent in the pharaoh's room. I get the 
gold, scepter, food, water, statue box and 
lamp. 

A tip for Bedlam: To get the green key, 
stay at the end of the hallway. Type GET 
GREEN KEY WITH HOOK. 

Frank Morrison 
Mercer Island, WA 

Scoreboard: 

In response to various recent cries for 
help . . . Pyramid: With the mummy, 
there's nothing you can do, except retrieve 
the treasures from the maze. 

Zork I: The Slide Room's wall isn't 
granite. The only granite walls in the game 
are in the Temple and Treasure room. 

Sands of Egypt: RIDE CAMEL three times 
to get to the pyramid. (However, you 
cannot get inside.) 

Stephen Berry 
Lake Jackson, TX 

POTPOURRI 

Scoreboard: 

In Zork 1 1 can't unlock the grating in 
the forest or get rid of the granite wall in 
the slide room or the temple. Is there any 
way to open the wooden door in the living 
room of the house? 

Joseph Branciforte 
Cromwell, CT 

You Get a Line, 
111 Get a Pole 

Scoreboard: 

In Blackbeard, to fish you need the 
string and a branch you cut from the 
coconut tree. 

In Martian Crypt, where do you get the 
red gem? 

Serge Grenier 
Boucherville, Canada 

Roll Over in the Glover 

Scoreboard: 

Some tips for Black Sanctum: Give the 
old man the jug of wine. When in the organ 
room, type PLAY BACH if you have the 
parchment. 

In Shenanigans, where do you find the 
Shamrock to get past the snake? 

Bill Hoban 
Green Bay. Wl 



Scoreboard: 

I can't get past the robot in the second 
room in Escape 2012. In Black Sanctum, 
how do you BUILD the altar? I can find 
everything else except some wood and 
nails. 

Jerry Honigman 
Waggoner, IL 

What's for Supper, Grandpa? 

Scoreboard: 

In Gantelet, on Screen 7, go to the 
upper-right and get a food. Go a little 
higher up and get a potion. 

Scott Jamison 
Billerica, MA 

Scoreboard: 

In Syzygy, I can get the spacemit (either 
of two), blanket (any of several), sword, 
string and fuzzy space creature. But then 
what? 

In Enrak, can anyone tell me how to 
light the lantern? 

In Escape 2012, how do you get past the 
guard just outside your cell? 

I have a fragmentary program called 
M&M Shee. Does anyone know where the 
complete program can be obtained? 

John Tiffany 
Washington, D.C. 

Scoreboard: 

With Trekboer, I get to the planet Alton, 
but I cannot get past the force field or the 
grate. 

Edward Swatek 
Chicago, IL 

Most Take American Express 

Scoreboard: 

In Calixto Island, we can get on the 
island and find the crown and pottery, but 
we don't know what to do next. If we go 
back to the natives a second time, they 
won't take anything and our boat is de- 
flated. 

Dean Muller and Joel De Young 
Elkhorn, Manitoba 

Scoreboard: 

A few hints for Robot Odessy I: You 
need the white robot for the maze at the 
end of the sewer. If you lose one robot 
anywhere and can't recover it, you might 
as well start all over; you need all of them 
later in the game. 

In Dallas Quest, how do you get the 
monkey to stop chewing the tobacco so 
you can bribe him to take the mask off the 
so-called head hunter chief? 

Andy Thornton 
Kalamazoo, Ml 



Double Speed 

Scoreboard: 

On Slay the Nerius and Microbes, you 
can achieve double speed. Before typing in 
your name, press the SHIFT key and while 
holding it down, press the @ key and let 
go. It may work on other games where you 
input your name in the text screen. Worth 
a try . . . game play is twice as fast. 

Minesh Patel 
Benton, AR 

Scoreboard: 

In Hall of the King, I get the crowbar, 
but I can't bend the bars on the gate. It 
always says, "I am not strong enough, 
now . . . ." 

Damon McGaughey 
Ashland, KY 

Caught in a Loop 

Scoreboard: 

I go into a continuous loop in Wizard's 
Castle: well-traveled road, to barn, to 
forest, to river — and then die from a 
cyclops or other enemy. 

Alex Abraham 
Atlanta, GA 

Scoreboard: 

In Raaku-Tu, after you have the first 25 
points (which you don't need .to go over 
any rugs to get) try pushing the altar 
around a little bit. If that doesn't help, try 
GO DOWN. 

Brent Dingle 
Norwalk, I A 

Scoreboard: 

Can anyone out there give aid with 
Raaka-Tu (I escape a lot only to die) or 
Shamusl 

John Beck 
Suitland, MD 

To respond to other readers' inquiries 
and requests for assistance, reply to 
"Scoreboard Pointers," c/o THE RAIN- 
BOW, P.O. Box 385, Prospect, KY 40059. 
We will immediately forward your letter to 
the original respondent and, just as impor- 
tantly, we'll share your reply with all 
"Scoreboard" readers in an upcoming 
issue. 

For greater convenience, "Scoreboard 
Pointers" and requests for assistance may 
also be sent to us through the MAIL 
section of our Delphi CoCo SIG. From the 
CoCo SIG> prompt, pick MAIL, then 
type SEND and address to: EDITORS. Be 
sure to include your complete name and 
address. 

— Jody Doyle 
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COCO CONSULTATIONS 



Tricking BASIC Into Printing 
Special Characters 



By Marty Goodman 
Rainbow Contributing Editor 



How can I get my CoCo to print a 
quotation mark to the screen under 
Microsoft BASIC? 

Raymond Lueders 
(MOONSHINE) 

Hanover Park, IL 

Because the quotation mark is used 
as a delimiter in the PRINT statement, 
you need to "trick" BASIC into seeing it. 
This is done using the CHRS statement 
to create a quotation mark, putting it 
inside of a string, and then printing that 
string. For example, if you want the 
computer to print the characters This 
is a "quote" printed to screen, try 
this: 

10 Q$=CHRS(34) 

20 AS="THI5 IS R " 

30 B$= "QUOTE" 

40 CS=" PRINTED TD SCREEN." 

50 PRINT H$+Q$+B$+QS+C$ 

Line 10 generates a quotation mark. 
Lines 20 to 40 create the text strings, 
and then Line 50 prints it all. 



Martin H. Goodman, M.D., is a long- 
time electronics tinkerer and lives in 
San Pablo, California. Marty is a RAIN- 
BOW contributing editor and writes the 
"CoCo Consultations" column. He is 
also the database manager of RAIN- 
BOW'S CoCo SIG on Delphi. 



Note that the same technique can be 
used to generate all sorts of other 
characters for printing to screen or to 
printer. 



Using a Sony RGB Monitor 

How do you hook up the CoCo 3's 
RGB output to a Sony RGB monitor? 
The monitor has a 34-pin connector 
with inputs for R, G and B, and a single 
input for combined down-going sync. 
The CoCo 3 puts out separate and up- 
going sync signals. 

Barbara Winnett 

San Bruno, CA 

Kenneth Conklin 

Alpena, MI 

You need to feed both the H and V 
sync into the inputs of a NOR gate (use 
a 74LS02 chip). You may install this 
chip either inside your CoCo 3 (and run 
it out through Pin 10 of the cable after 
disconnecting Pin 10 inside the CoCo 
from the PIA to which it normally 
goes), or install it inside the Sony 
monitor, and provide for separate and 
up-going sync inputs on two of the 
many unused pins on that 34-pin dual- 
row header male connector that many 
Sony brand monitors use for their RGB 



A input. Then make up your cable 
accordingly. Be sure to tie high any 
unused inputs on that 74LS02. Note 
that a 74S02, 74F02 or 74ALS02 will 
work fine too. 

Some Sony monitors lack the 34-pin 
connector and instead use only an odd, 
rectangular, 8-pin video connector. If 
yours is like that, you may want to 
install the 74LS02 chip inside the CoCo 
3. One good way to do so simply and 
quickly would be to piggyback it on top 
of IC 15 (the 74LS04 chip in the CoCo 
3), where the H and V sync signals are 
readily available. 

Please note that the advice 1 gave on 
this matter in a previous "CoCo Con- 
sultations" column was slightly flawed. 
1 suggested using separate inverter gales 
and then combining the outputs. This 
will not work. You could have used a 
single inverter gate and combined the H 
and V sync inputs using diodes and a 
"wire OR" circuit, but what 1 have 
recommended this month is a superior 
solution. 



The Atari Connection 

How can I hook up my Atari SCI 224 
RGB color monitor to my CoCo 3? 

Kerrv Bankston 
Evadale, TX 



186 



THE RAINBOW April 1987 



Atari uses an odd 13-pin DIN con- 
nector for its video input, arranged as 
follows: 

12 3 4 

5 6 7 8 

9 10 11 12 
13 

(looking at the female connector on the 
back of the Atari SCI 223). Connectors 
for it can be ordered from Alpha Prod- 
ucts, P.O. Box 4306, Thousand Oaks, 
CA 91360, (818) 899-9304. On this 
connector, pins 6, 7 and 10 are red, 
green and blue respectively. Pins 8 and 
13 are ground, and pins 9 and 12 are 
horizontal and vertical sync, respec- 
tively. Pin 5 may be audio. Ostensibly 
the RGB analog levels and polarity of 
the Atari are similar to that of the 
CoCo's output. 

When 1 hooked up my CoCo 3 to the 
Atari by merely hooking up the corres- 
ponding R,G,B and the H and V sync 
and ground lines. I got a sharp image. 
Unfortunately, the image was shifted by 
about a quarter of the screen up and to 
the left. There was not enough latitude 
on the H and V position adjustments of 
the monitor to get the image properly 
centered. There were some other prob- 
lems as well, involving failure to display 
properly the ALT-CTRL-RESET "Three 
Mugateers" picture, and some weird 
behavior with some programs. 

There appear to be some subtle dif- 
ferences in timing and/or expected 
signal levels. It is possible that several 
hours spent with an oscilloscope look- 
ing at the signals from the Atari ST 
color video and comparing them to 
those of the CoCo 3 would yield the 
answer. Possibly some delay circuits on 
the sync and/ or repositioning of the 
magnets on the SCI 224 monitor's pic- 
ture tube would solve all of the prob- 
lems. 

The chief engineer at one company 
which sells RGB analog monitors con- 
fided that he was having a devil of a time 
getting his company's monitors to work 
properly with the Atari ST's video 
output, further implying some (proba- 
bly intentional) weirdness about the 
RGB protocol used by Atari. It appears 
that the CoCo 3 uses a more standard 
sort of RGB than does the Atari ST, 
though in the world of RGB, there 
really is very little that can be consid- 
ered a standard. 



ROM Call Locations 

Can you tell me the different ROM 
call locations needed to convert pro- 
grams that ran under Disk Extended 
BASIC 1.0 to run under Disk Extended 
BASIC 1.1? 

Ralph Coleman 



Although Disk Extended BASIC 1.1 is 
nearly identical to Version 1.0 in terms 
of the code for its routines, almost every 
call is in a different place. 1 can't provide 
you with a complete list of such differ- 
ences — it would take me far too long. 
But you can get all the information you 
need from looking at Disk Extended 
Basic Unravelled, a complete disassem- 
bly of both versions. This is published 
by Spectral Associates, and can be 
purchased from Spectrum Projects. I 
have been told that Spectral Associates 
will likely have released a disassembly 
for the ROM and patched RAM images 
of the CoCo 3 by the time you read this. 



Changing RTTY Transmit Rates 

How can I change the shift of the 
RTTY program to transmit at 850 for 
60 wpm operation that we use on the A ir 
Force MARS net? 

Earl Kleeherger 
Springfield, OH 



A complete copy of the assembly 
language source code for the RTTY 
program is posted in the Data Com- 
munications section of the Delphi RAIN- 
BOW CoCo SIG. You may alter it at your 
own risk, but 1 warn you this is an 
extremely delicate and sophisticated 
code, and only a master 6809 pro- 
grammer will be able to modify it and 
make it work as desired; the RTTY 
program is full of very precise real-time 
loops. The timing is an integral part of 
the way the code was written and cannot 
be altered in any simple fashion. Sorry. 
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CoCo 3 Questions 

How can I make my CoCo 3 have a 
readable display with a monochrome 
monitor? How can I make my CoCo 3 
work in 80-column mode with the RS- 
232 Pak? Where can I get a TI 6847T1 
VDG chip? No Texas Instruments dis- 
tributor has heard of it. 

Dick Buescher 
Madison, WI 



Set the palette so that you have white 
(palette color 63) on black (palette color 
0) for the text display. The text will then 
look fine on a monochrome monitor. In 
32-column mode this involves setting 
PALETTE 12,0:PRLETTE 13,63 0. In 
40- or 80-column mode you must play 
with palettes and 8 (PALETTE 
0,63: PALETTE B,63). This, of course, 
is for BASIC programs. Other programs 
hopefully will offer the option of choos- 
ing a white on black display. 

The program in the ROM of the RS- 
232 Pak is worthless, so don't worry 
about it not working in 80-column 
mode of the CoCo 3. But, with a mul- 
tipack, you can use any of many excel- 
lent programs for the CoCo 3 and RS- 
232 Pak that support 80 columns. Com- 
mercial products that support the RS- 
232 Pak and CoCo 3 in 80-column mode 
include Color Connection from Com- 
puterware and Data Pak II Plus from 
Cer Comp. Data Pak II Plus provides 
good support for VT100 terminal em- 
ulation. 

The 6847T1 VDG is not made by 
Texas Instruments. Instead, it is made 
by Motorola. Or rather, it was made by 
Motorola. In Volume 8, No. 1 of Mo- 
torola's Semiconductor Data Update 
flyer, they announce that as of March 
31, 1987, they are discontinuing the 
6847TI VDG chip. This is not suprising, 
for the CoCo 2 has been out of produc- 
tion for nearly a year, and there were 
few other applications for that ill-fated 
chip. No one is interested in a 32- 
column lowercase-capable video gener- 
ator when far more flexible video dis- 
play chips are available. 

Don't waste your time with the 
6847TI. If you need one as a replace- 
ment part for your old CoCo IIB com- 
puter, the chip is available from Tandy 
National Parts. 



Bad Boots on the CoCo 3 

/ have DL LOGO and am unable to get 

it to boot on the CoCo 3. Can you help? 

Kenny Pikulski 

(PIKULSKI) 

Monumet Beach, MA 

I'm unable to get Trivia Fever to hoot 
on the CoCo 3. Can you help? 

David Rehm 
Fort Myers, FL 

The reason both DL LOGO and Trivia 
Fever won't boot on the CoCo 3 is that 
they both boot up under OS-9 Level I, 
Version 1.0 or Version I.I, and those 
versions of OS-9's boot process violate 
rules for the CoCo 3 and cause a crash. 
Fortunately there is a simple way to get 
around this. Merely boot up under OS- 
9 Level 1, Version 2.0, then put the 
Trivia Fever or the DL LOGO disk in 
your drive and press the reset button 
once. OS-9 will reboot, but will bypass 
the very earliest stage of the boot 
process, and it was this stage that caused 
the crash. Using this technique, you can 
also boot up OS-9 Level I Version 1.0 
on the CoCo 3. 

I have examined the boot code that 
lies on Track 34 and have determined 
that the problem is an attempt to write 
over memory at SFE00 and up, where 
the CoCo 3 puts its interrupts. Indeed, 
I have been able to make a very minor 
modification to the boot code there that 
allows OS-9 Level 1 , Version 1 .0 to boot 
properly on the CoCo 3. Look for an 
article on the needed patch to be pub- 
lished in RAINBOW in the next month or 
so. Such a patch would make it unnec- 
essary for you to get OS-9 Level 1, 
Version 2.0 by merely properly patching 
the boot routine of Version 1.0. DL 
LOGO, Trivia Fever and other early OS- 
9 Tandy products that currently suffer 
from the same problem. 



PAL Switcher 



You spoke of a PAL switcher in your 
article on the CoCo 3 fix for the CoCo 
Mult i- Pak. Will such a gizmo be avail- 
able as a commercial product? 

Paul K. Ward 

(PKW) 

Arlington, VA 

Yes, I believe that Spectrum Projects 
will be carrying a PAL switcher for the 
Catalog No. 26-3024 Multi-Pak. This 



device is of interest to those who own 
one multipack but want to use it some 
of the time with their CoCo 2 and at 
other times with their CoCo 3. It allows 
you to have both the old and new PAL 
chips installed and to switch between 
them. It is expected to retail for $29.95, 
but may be sold for a bit more with a 
special varient upgrade PAL included 
that allows running the CoCo Max 
hardware and software on the Coco 3. 



Not Truly Random 

/ use the RND function, but every time 
I start up a program using it I get the 
exact same "random" number se- 
quence. How can this be fixed? 

Genaro Hernandez 
San Luis Potosi, Mexico 

The RND function generates a pseudo 
random number sequence that actually 
repeals after many values, on the basis 
of an equation. To get it to start up at 
a different part of that sequence, all you 
need to do is to "seed" the RND function 
with the particular value of the timer. 
This is done using the stalemenl: 

10 X=RND(-TIMER) 

If you include this statement at the 
start of your programs, they will start 
at totally different values of the random 
number sequence each time, for the 
start point will be set with the value of 
the timer, which in turn will be ran- 
domly selected depending on the exact 
instant at which you typed RUN com- 
mand. 



Your technical questions are welcomed. 
Please address them to CoCo Consultations, 
THE RAINBOW, P.O. Box 385, Prospect, KY 
40059. 

We reserve the right to publish only 
questions of general interest and to edit for 
brevity and clarity. Due to the large volume 
of mail we receive, we are unable to answer 
letters individually. 

Questions can also be sent to Marty 
through the Delphi CoCo SIC. From the 
CoCo SIG> prompt, pick Rainbow Maga- 
zine Services, then, at the RAINBOW> 
prompt, type ASK (for Ask the Experts) to 
arrive at the EXPERTS> prompt, where 
you can select the "CoCo Consultations" 
online form which has complete instruc- 
tions. 
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Sounds Like 
A Bad Connection 



By Dan Downard 
Rainbow Contributing Editor 



• When I try to use my RS-232 primer 
port, the computer just seems to hang 
up. I've tested the printer on other 
CoCos, and it works fine. Also, I've 
found that pressing down on the PC 
board of my CoCo will initiate printing. 
Dan Grampsas 
San Francisco, CA 

It sounds as if you have a bad con- 
nection from the serial I/O connector to 
the circuit board, Dan. Pin 4 on the 
serial connector must be held high in 
order to output data when using the 
port for a printer. This is called a 
handshake signal and normally sent 
from the printer to your CoCo to indi- 
cate that the printer buffer is not full 
and. therefore, ready to accept data. In 
your case, since you have a bad connec- 
tion, Pin 4 is not high and data is not 
being sent to the printer. 

Repair will consist of removing the 
circuit board and re-soldering the con- 
nection. If you don't feel comfortable 
with doing this, take your computer to 
a Radio Shack Service Center. My 
experience has been that Radio Shack's 
service organization is good. 



A PASCAL Bonanza 

• / was wondering if you knew of a 
company that made a PASCAL program 

Dan Downard is an electrical engineer 
and has been involved in electronics for 
27 years through Ham radio (K4KWT). 
His interest in computers began about 
eight years ago and he has built several 
68 XX systems. 



similar to Turbo PASCAL that is CoCo 
3 compatible. I think DEFT PASCAL 
might be, but I haven V seen it advertised 
for a long time and I don't know how 
to get in touch with them. 

Craig Fischer 
Renton, WA 



Craig, I am aware of at least two 
PASCAL packages for the CoCo other 
than those that you mentioned. First of 
all Radio Shack has a PASCAL package 
for OS-9 that was introduced by Mi- 
croware. You must first have OS-9 
Level I Version 2.0 or Level 1 1 to use this 
package on your CoCo 3. 

The second PASCAL editor and com- 
piler I am aware of also requires OS-9. 
It is called Dynasoft PASCAL, and is 
distributed by Frank Hogg Labs. 

I am no pascal expert, but I have 
seen both packages and can only com- 
ment that the documentation for the 
Radio Shack version is better. As far as 
the features, you will have to investi- 
gate. 



Running a BBS 

• / own a 64K CoCo 2 with J DOS and 
two drives (SSSD), a modem IB and a 
Deluxe RS-232 Program Pak. My goal 
is to run my own BBS by modifying the 
modem as described in the November 
1984 issue and writing my own BBS 
software. I would like to be able to use 
both the RS-232 and the drive for this. 
Although the A CIA is not mapped into 
the same place as the drive controller. 



(ACIA: SHFF68 - SHFF6B, drive con- 
troller: $HFF40 - SHFF43), is it still 
possible to have them both on the 
busses without any problems? Can it be 
done with a Y cable? Can it be done with 
a Mult i- Pak? Would you recommend 
OS-9 for this application? How well 
does J DOS work with OS-9? 

Rob Wedlock 
Casper, WY 



There is no hardware incompatibility 
between the ACIA in the RS-232 Pak 
and your disk drive, Rob. The problem 
is the ROM in the RS-232 Pak. It's at 
the same address as your disk ROM. 

You have two alternatives to solve 
this problem. First, use a Multi-Pak 
interface. This prevents the ROM con- 
flict and allows both yourdisk drive and 
RS-232 Pak to be used simultaneously. 

You can indeed use a Y cable if you 
disable the ROM in the RS-232 Pak. At 
the same time. I do not recommend Y 
cables due to the problems they create 
adding extra capacitance to an already 
unbuffered bus. 

Regarding your concern of using 
J DOS with OS-9, after the initial boot- 
ing process, OS-9 is a 64K RAM oper- 
ating system and does not use JDOS. 
You must be careful though! There are 
address conflicts between J&M disk 
hardware and reserved memory in the 
CoCo 3. I see no advantage in using 
either RS-DOS or OS-9 for a bulletin 
board, other than the fact that with OS- 
9 you can have a multi-user BBS. I 
would recommend OS-9 Level II if 
you're considering OS-9. 
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Graphics Memory 

• / own a 64K CoCo 2 with a cassette 
player. I have been working on a draw- 
ing program, hut I ran into a snag. I'm 
having trouble saving the graphics 
screen. When I try CSRVEM Nfl$, 
1536,3072,380 it saves perfectly but 
when I reload the picture, only the top 
half of it is there. Why is this? What is 
the correct statement? 

Rick Normandeau 
Wetaskiwin, Alberta 

Rick, the solution to your problem 
requires an understanding of the mem- 
ory map of your CoCo and of how 
memory is allocated based on the dif- 
ferent graphics commands. Two com- 
mands have a lot to do with how your 
memory is organized, PCLERR and 
PMODE. 

PCLERR reserves a number of gra- 
phics pages (up to eight) for use as 
graphics screens. Each page occupies 
I.5K of memory. When your computer 
is turned on. Extended BASIC reserves 
four pages, or 6K, of memory for graph- 
ics. This is the equivalent of a PCLERR4 
command. This memory starts imme- 
diately above your text screen memory, 
which happens to be at $400 to S5FF 
Keep in mind that the '$' stands for 
hexadecimal notation. If you want to 
convert this to decimal, use the follow- 
ing BASIC direct statement: '&HG00. 
You should get 1536 as an answer. That 
just happens to be the starting address 
you mentioned in your letter. If you add 
S600 (the start of your graphics screens) 
and S600 (I.5K of graphics memory on 
startup) you get $ 1 E00. Therefore, your 
basic program will start at SIE00, if 
you haven't changed the graphics mem- 
ory allocated by use of the PCLERR 
command. Otherwise, your graphics 
memory always starts at $600 and ends 
depending on the graphics memory 
allocated by the PCLERR command. 

Even though you allocate memory 
space by the use of the PCLERR com- 
mand, the actual amount you use de- 
pends on the PMDDE command. The 
following chart will help you under- 
stand. 



Command 

PMDDE0.X 
PMODE1.X 

pmode;,x 

PM00E1.X 
PMODES.X 



Resolution 
128 bv 96-2 Color 
128 by 96-4 Color 
128 by 192-2 Color 
128 by 192-4 Color 
256 by 192-2 Color 



Pages 

1 

2 
2 
4 
4 



As you can see, PMODE0 requires one 
page, or 1. 5 K, per screen. You can select 
the screen used by the X, or second 
argument, of the PMODE command. To 
further our understanding, upon start- 
up you have the choice of four PMODE0 
screens, since each requires one page. 
Keep in mind that 1K=$400, or 1024, 
and that I page=I.5K=$600, or 1532. 

Hopefully, from this discussion you 
can figure out what the starting and 
ending addresses are for your graphics 
screens. In your case, Rick, it sounds as 
if you are not executing the proper 
PMODE command for the graphics you 
have saved or maybe only saving half of 
the graphics screen in the first place. 



High Speed Disk I/O 

• / 've read that you cannot save or load 
anything from or to your disk drive 
under the high speed poke. 1 wish 
someone would tell this to my Color 
Computer. I just got my disk drive this 
year, and I have Disk Extended BASIC 
I.I. I found out by mistake that I can 
save programs to disk under the high 
speed poke G5495 , 0. Will this hurt my 
system in any way? 

If I use a J I M Controller on my disk 
drive, will I be able to use all 40 tracks? 

Mike Zweitel 
Sturtevant. WI 

Mike, storing data to your disks has 
little to do with the speed of your CoCo. 
All of the data transfer is handled by the 
Western Digital WD1793 chip inside the 
disk controller. Interrupts are used to 
transfer data between the disk con- 
troller and the microprocessor inside 
your CoCo. Maybe you are comparing 
disk I/O to tape I/O, where software 
timing is used. 



Suspect Chips 

• / have a 64 K computer with Disk 
Extended basic I.I, and I have a key- 
board problem with my gray CoCo. I 
originally had the old Chiclet-type 
keyboard, and neither the G nor the O 



key would function unless you pressed 
the keys very slowly, and that only- 
worked about 10 percent of the lime. 
The problem only existed when the high 
speed poke was present. But when I had 
the new CoCo 2 keyboard installed, it 
didn V even work in the normal speed. 
The only way I can make an O or G is 
to push the SHIFT at the same time I 
push O or G. But this presents a prob- 
lem when using a program that uses 
upper- and lowercase. In some machine 
language programs, the O and the G 
work fine. 

Mike Roush 
Ottawa, KS 

Mike, from the sound of your prob- 
lem, I would be more suspect of either 
the 6809E microprocessor or the 6821 
PIA than the keyboard contacts. I guess 
the fact that it won't work at high speeds 
is the key. Try replacing these chips and 
see if that cures your problem. 



Old Drives for the CoCo 2 

• / have a TRS-80 Model I disk drive, 
(Catalog No. 26-1164). It uses 5'A-inch 
disks, 40 tracks, single-sided. I want to 
redesign it for my CoCo 2 64 K. What 
do I do to make the change? 

Richard West 
West Jordan, UT 

Richard, all that you need to use your 
old disk drive is a Color Computer Disk 
Interface (Catalog No.26-3022) and the 
cable connecting the controller to your 
drive. I assume that the drive is in a case 
and has a power supply. Along with the 
hardware you get Disk BASIC. For your 
information the interface cable between 
the controller and drive uses a 34-pin 
flat cable connector. 



Learning Machine Language 

• / have a 64K Color Computer with a 
disk drive and modem. I would like to 
learn machine language. I am looking 
for a program that has a machine 
language monitor, assembler and disas- 
sembler, like Disector/br the Commo- 
dore 64. Is there one available for the 
CoCo 2? Also, is there a good memory 
map available? 

Mike Keahl 
Lakeland, FL 
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Mike, have you tried EDTASM + 
from Radio Shack? I still use it for all 
of my machine language programming. 
It has an editor, assembler and a mon- 
itor/debug program named ZBUG. 
There have been several patches in THE 
RAINBOW for converting the original 
ROM Pak to disk I/O, but Radio Shack 
has since introduced Disk EDTASM+. 

We published a memory map in THE 
rainbow several years ago, but I would 
recommend the BASIC Unravelled 
series by Spectral Associates, available 
from Spectrum Projects. 



Uncovering the DOS Command 

• / have three questions. The first deals 
with a command I accidentally found in 
the RS-DOS operating system called 
DOS. When you type the command, the 
drive comes on and the computer loads 
a hunch of garbage. It isn V documented 
in my owners' manual. I thought it 
might he a boot for OS-9, hut I don 7 
have a copy to try it on. 



My second question deals with put- 
ting the computer in the Extended 
BASIC only mode without disconnecting 
the drive controller. I read a review in 
the February 1986 issue on a DOS 
Switcher from Spectrum Projects which 
led me to believe it would be possible 
to put a switch on the disk ROM enable. 
Then, by switching it out and rebooting 
ECB, the disk ROM would be com- 
pletely transparent to programs like my 
old cassette version Telewriter. Do you 
know if this would be dangerous to the 
computer or if it would even work? 

Finally, I would like to know about 
Y cables versus multipacks. How do Y 
cables work? Must the cartridge be 
designed to be used with a Y cable or 
will all cartridges work? Again, would 
use of the Y cable make unplugging the 
drive controller unnecessary, especially 
for things like the speech synthesizer 
cartridge? 

Larry Ullom 
Wheeling, WV 

The DOS command is indeed a boot 
program for OS-9 that was added to 
Disk BASIC in Version 1.1 and later. It 
has other custom uses depending on 



your imagination. All that it does is 
transfer data from Track 34 of the disk 
and execute the program in memory. 

As far as your question on the ROM 
switcher, I would recommend it for 
what you are trying to accomplish. You 
can use it by omitting one on the ROMs. 

I do not recommend Y cables due to 
possible hardware timing problems 
associated with extra bus capacitance. 
At the same time the only real problem 
is that not all hardware add-ons use 
unique addressing. A Multi-Pak will 
solve most of these problems and still 
offer reliable bus operation. 

Your technical questions are welcomed. 
Please address them to: Downloads, the 
rainbow, P.O. Box 385, Prospect, KY 
40059. We reserve the right to publish only 
questions of general interest and to edit for 
space and clarity. Due to the large volume 
of mail we receive, we are unable to answer 
letters individually. 

Your technical questions may also be sent 
to us through the MAIL section of our 
Delphi CoCo SIG. From the CoCo SIG> 
prompt, pick Rainbow Magazine Services, 
then, at the R AINBOW> prompt, type LET 
to arrive at the LETTERS> prompt, where 
you can select the "Downloads" online form 
which has complete instructions. 



The excitement continues . . . 

The Third Rainbow Book of Adventures 

Nineteen fascinating new Adventures from the winners of our third 
Adventure competition. Discover backstage intrigue at the London Theatre, 
attempt a daring space rescue, or travel through time to save the universe. 
And that's only the beginning! 

The Third Rainbow Book of Adventures is only $1 1.95! 

Save yourself from debugging nightmares — get 
the Third Adventures Tape or Disk Set. 

Get on with your game and eliminate typing hassles. Just load these great 
programs into your computer and run. 

The Third Rainbow Adventures Tape is $9.95, Two-Disk Set $ 1 4.95 

The tape and disks are adjuncts and complements to the book; the book is necessary lor 
introductory material and loading instructions 

Please send me: The Third Rainbow Book of Adventures $1 1 .95 

The Third Rainbow Adventures Tape $9.95 



The Third Rainbow Adventures Disk Set S14.95_ 



Name _ 
Address . 
City 



-Stale. 



.ZIP. 



D My check in the amount ot is enclosed' 

Please charge to my. D VISA □ MasterCard D American Express 

Acct. No 

Signature 



. Exp. Dale . 



Mall to: The Third Rainbow Book of Adventures, The Falsott Building, 

P.O. Box 385, Prospect, KY 40059 
To order by phone (credit card orders only), call (800) 847-0309, 8 a.m. to 5 p.m. 
EST. For other inquiries, call (502) 228-4492. 

'Add S1.50 shipping and handling per book. Outside the U.S. add $4. Atlow 6 to 
B weeks tor delivery. Kentucky residents add 5% sales tax lor book and taps. In 
order to hold down costs, we do not bill. U.S. currency only please. 



EACH PROGRAM COMES WITH 
** 10 FREE DISK ** 



VCR DATABASE & MINI TITLE SCREEN MAKER • S20.98 

Catalog your VCR tapes. Create title screens. Print out records. 

FILE VIEWER - S19.98 

Single key program loading & more. View all disk files at one time. 

CHECKBOOK III - S19.98 COCO 3 ONLY 

Keep track of checks & expenses. Print out check & expense records. 

COUPON FILER - S19.98 COCO 1 & 2 ONLY 
For the smart shopper. Keep track of coupons. Print shopping lists. 

S.T.A.G. - A GRADEBO0K - S35.00 

Full year. Statistical analysis, weighting & more. Up to 50 students. 

FRACTION REVIEW - S24.98 GRADE 5-9 

Hi-Res. game for addition & subtraction of fractions. 

MATH MISSION • $24.98 GRADE 2-5 

Arcade game for learning simple math. Joystick required. 

WORD GAMES - S24.98 GRADE 2-ADULT 

4 Hi-Res. spelling games. Includes 6 word lists. Add more lists. 

PUZZLE MATH - S19.98 GRADE 2-5 
18 pictures, up to 48 pieces. Great way to practice simple math. 



ALL PROGRAMS FOR 64K COCO 1,2,3, 1 DISK MIN. ADD S3 S/H. + S1 S/H 

PER EACH ADDITIONAL PROGRAM ORDERED. C.O.D. $2 EXTRA. MS RES. 

ADD 6% SALES TAX. CALL OR WRITE FOR FREE CATALOG. MAKE FUNDS 

PAYABLE TO SECA. 



EXCITING OPPORTUNITY FOR NEW PROGRAMMERS TO MARKET THEIR PRO- 
GRAMS. WRITE FOR DETAILS. DEALERS WELCOMED. 



RAINBOW 

KM 



SECA - P.O. BOX 3134 

GULFP0RT, MS 39505 

(601) 832-8236 



RAINBOW 

CC«TlF.C»TlOt. 
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OS-9 LEVEL 



Understanding How OS-9 
Manages Memory 



By Peter Dibble 



Let's start by reviewing some 
terms from last month's article. 
The 6809 uses logical addresses 
to access memory. These logical ad- 
dresses are intercepted by the DAT 
(Dynamic Address Translation unit) 
which translates them into physical 
addresses. All the logical addresses that 
a process can use (there may be up to 
64K valid logical addresses) make up its 
logical address space. The physical 
addresses they translate to make up its 
physical address space. On the CoCo 3, 
the DAT translates addresses in 8K 
segments called blocks. 

OS-9 Level II uses memory manage- 
ment hardware to give each process up 
to 64 K, to protect processes from one 
another, and to make memory fragmen- 
tation irrelevant. 

The normal use of OS-9 Level II is to 
use much more than 64K of memory to 
run many processes at the same time 
(maybe as many as 57 on the CoCo 3), 



Peter Dibble has a bachelor 's degree in 
chemistry and is currently a graduate 
student in computer science. He has 
worked as an applications programmer, 
systems programmer and as the user 
services assistant director for the Uni- 
versity of Rochester Computing Center. 
With Dale Puckett, he is the coauthor 
of The Complete Rainbow Guide to 
OS-9. 



and to isolate them from each other. 
There is a small increase in the memory 
available to a process (up to almost 
64K) because most of OS-9 is hidden, 
but programs bigger than 64K are not 
directly supported by OS-9. 

Large programs are one of my main 
interests and a feature of this series. 
Maybe I convinced you last month that 
OS-9 needs to support them. Why 
doesn't it? 

There are at least two good reasons 
for OS-9 Level II to ignore the possibil- 
ity that a single program could use more 
than 64K. Microware was always 
strongly committed to keeping all ver- 
sions of OS-9 as compatible as possible. 
The changes required to make it much 
easier to use extended memory from 
within a program would have driven 
Level II far from Level I. 

It probably wasn't worth the effort to 
make it easy to use extended memory. 
Limited memory is seldom a serious 
problem, and there are pleasing ways to 
circumvent the limit. 

Processes and Address Spaces 

Under OS-9 Level I, a process gets a 
program module, a data area with the 
stack growing toward the bottom of it, 
at least three I/O path numbers and an 
occasional slice of CPU time. Under 
Level II a process gets all that plus an 
address space. That's the main advan- 
tage and the main fault of Level II. 



OS-9 allocates two regions of mem- 
ory to each process. One is for the 
program module and any other mod- 
ules the process brings in; the other 
region is for data. Since each allocation 
is for at least 8K, a single process uses 
at least 16K. If you assume that OS-9 
uses 48K for itself and uses the I6K 
minimum per process, you find that the 
CoCo has memory for 29 processes. I 
got 57 processes by assuming that they 
all share common code and so get by 
with only 8K of memory per process. 

OS-9 manages the DAT so a program 
has to make a special effort to access 
memory in another program's address 
space. If you run a buggy program, it 
is difficult for it to corrupt another 
program's memory. This is a particu- 
larly big advantage if you have several 
users on your system. It is a particularly 
dreadful problem if your program 
wants to use data that OS-9 associates 
with another process. 

Using data associated with another 
process sounds pretty arcane. Processes 
usually don't even know that they share 
the processor. Why should they care 
that they can't access one another's 
variables? If you follow good OS-9 
programming practice the separation 
will be no problem. If you don't, the big 
pitfall is that the OS-9 operating system 
has its own address space. You can't get 
at OS-9's data structures. 

Hardware and software interrupts 
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are a problem for OS-9. The 6809 insists 
on using interrupt vectors in the top few 
bytes of memory. The processor doesn't 
know about the DAT, so those vectors 
have to be at the top of every logical 
address space. Does every program 
have to include the interrupt vectors 
and service routines? 

The problem is solved with a bit of 
a kludge. There is a 256-byte piece of 
OS-9 in every address space. It catches 
interrupts, sets up a few things, switches 
the task register to select OS-9's address 
space, and jumps into the main part of 
OS-9. 

Fragmentation 

There is no such thing as memory 
fragmentation under Level II. OS-9 
builds an address space by setting up a 
DAT image (a copy of the values it will 
store in the DAT registers for that 
address space). It plunks block numbers 
into the DAT image any way it likes. 
They don't need to be sequential or even 
in order. OS-9 Level I requires that 
allocations of memory be contiguous. 
Memory management lets Level II 
escape that requirement and the frag- 
mentation problem with it. 

Building an address space for a pro- 
cess proceeds in two steps. One step is 
to find the program module for the 
process. The memory containing the 
module is put at (or near) the high end 
of the DAT image. The other step is to 
find enough free blocks for the data 
space the program wants. These blocks 
are put at the bottom of the DAT image. 

Here's an example in more detail. The 



object is to create an address space for 
the imaginary program Tester. 

a) Put the blocks containing Tester 
near the top of the image. OS-9 
searches for the Tester module, 
finds it in blocks 20 and 21 and 
puts them in the image: 

(0, 0, 0, 0, 0, 0, 20, 21) 

b) Find enough free blocks to satisfy 
Tester's requirements (20K). OS-9 
searches these for three blocks, 
and finds them at 30, 35 and 50: 

(30, 35, 50, 0, 0, 0, 20, 21) 

c) Fill the remaining slots in the DAT 
image with a junk block number. 
Some block number must be desig- 
nated as junk for this purpose. If 
it's 62, the final DAT image will be: 

(30, 35, 50, 62, 62, 62, 20, 21) 

The top 512 bytes of each address 
space are reserved for OS-9 and the 
memory-mapped area. If a module 
would overlap that memory, OS-9 
doesn't use the top block for it. The only 
way OS-9 can fail to find the memory 
for a program is if there are not enough 
free blocks anywhere in memory. 

A Pitfall 

When you load modules, OS-9 makes 
a special address space for them. This 
gets interesting when you load a file 
containing several modules which OS- 
9 neatly packs into an address space. 
This saves lots of memory, but when 
you use any one of the modules, OS-9 
brings the entire module address space 
with it. 



If you like to include utility programs 
in your 0S9Boot file, be warned. You 
get everything in the bootstrap with any 
utility program. If you have 32K of 
modules in your bootstrap including 
GoToXY, you will have mysterious prob- 
lems. A program that wants to use 
GoToXY will link to the module. OS-9 
will map the address space containing 
GoToXY into the program's address 
space — all 32K of it. When the pro- 
gram runs out of memory you will be 
surprised. After all, GoToXY is only 200 
bytes or so. 

That's a mighty fast treatment of 
modules. I'll come back to them, but I 
wanted to make sure this little pitfall 
was exposed early. 

OS-9 puts each process in a separate 
address space. This means that pro- 
cesses can't easily access one another's 
memory. The best assumption is that 
your program can only use data that it 
has allocated. It can't use OS-9's vari- 
ables. It also means that one program's 
stray pointer won't crash another pro- 
gram. 

Since the DAT can assemble an ad- 
dress space from blocks of physical 
memory in any order, memory frag- 
mentation is not an issue for OS-9 Level 
II. 

Merging modules into files is a good 
idea under Level II. It is commonly used 
for utility programs that you load from 
a file at start-up time. Collections of 
more than 8K of modules are not so 
good. Including modules that aren't 
part of OS-9 in 0S9Boot is a bad 
idea. /K* 




OS-9 SOFTWARE/HARDWARE 



SDISK— Standard disk driver module allows the full use of 35, 40 
or 80 track double sided disk drives with COCO OS-9 plus you 
can read/write/format the OS-9 formats used by other OS-9 
systems. (Note: you can read 35 or 40 track disks on an 80 track 
drive). Now updated for OS-9 ver. 02.00.00 $29.95 

SDISK + BOOTFIX— As above plus boot directly from a double 
sided diskette S35.95 

L1 UTILITY PAK— Contains all programs from Filter Kits Nos. 1 
& 2 plus Hacker's Kit #, plus several additional programs, Over 
35 utilities including "wild card" file cmds, MacGen command 
language, disassembler, disk sector edit and others. Very useful, 
many of these you will find yourself using every time you run your 
system. These sold separately for over $85. $49.95 

SKIO— Hi res screen driver for 24 x 51 display; does key click, 
boldface, italics; supports upgraded keyboards and mouse. With 
graphics screen dump and other useful programs. Now UPDATED 
FOR OS-9 Ver 2.0 $29.95 



PC-XFER UTILITIES— Utilities to read/write and format ss MS- 
DOStm diskettes on CoCo under OS-9. $45.00 (requires SDISK) 

CCRD 512K Byte RAM DISK CARTRIDGE— Requires RS Multipak 
interface, two units may be used together for 1MB RAM disk. OS-9 
driver and test software included. $199.00 

All disk prices are forCoCo OS-9 format; for other formats, specify 
and add $2.00 each. Order prepaid or COD, VISA/MC accepted, 
add $1.50 S&H for software, $5.00 for CCRD; actual charges added 
for COD. 



D.P. Johnson, 7655 S.W. Cedarcrest St. 
Portland, OR 97223 (503) 244-8152 

(For best service call between 9-11 AM Pacific Time) 

OS-9 Is a IradomarH of Mlclowaie and Motorola Inc. 
MS-DOS Is a tfadomaiK of Mlcrosolt, Inc. 
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BITS AND BYTES OF BASIC 



Making the Most 
of CoCo 3 Features — 
Without Overdoing It 

By Richard A. White 
Rainbow Contributing Editor 



After last month's physics and 
programming lessons, it is time 
for lighter fare. A few trips to 
rainbow's Delphi CoCo SIG recently, 
has opened my eyes — and my pocket 
too — to things going on in the CoCo 
world th it I had not kept up with. There 
are some really fine software packages 
for all CoCos just waiting to be down- 
loaded. Most of the CoCo 1 and 2 items 
run on the CoCo 3 as well. 

One of the finest programs under RS- 
DOS is KDSK by Kenneth L. Wuelzer, 
113 Arrowhead Dr., Montgomery, AL 
36117. Talk about a disk utility pack- 
age, this one does it all and runs on all 
CoCos. It will format a target disk and 
back it up with a disk in another drive 
in 1 10 seconds. It takes RS-DOS nearly 
as long just to DSKINI a disk. We 
control our CoCo users group public 
domain library by copying disks for 
later sale at $2 or $3 at the meetings. You 
can imagine what a boon KDSK has been 
to the librarian. 

By the way, our library includes only 
public domain and shareware software. 
Some of the material on the Delphi 
CoCo database is in it. Software pub- 

Richard White lives in Fairfield, Ohio, 
has a long background with microcom- 
puters and specializes in BASIC pro- 
gramming. With Don Dollberg, he is 
the coauthor of the TIMS database 
management program. 



lished in rainbow is not in the library, 
in keeping with RAINBOW'S policy. Nor 
is there commercial software in the 
library, even for people to "try out." 
kdsk, which is shareware, is in the 
library. Shareware should be copied and 
distributed, since the first objective is to 
get it into the machines of as many 
people as possible as quickly as possi- 
ble. Cash return to the author correlates 
directly with the number of "free" 
copies distributed. Get a copy of KDSK 
and give one to each of your friends. 
Those who like and use the program are 
requested to send Kenneth Wuelzer $15 
for a registered disk with complete 
documentation files. That is little 
enough to ask for software of this 
quality. 

With KDSK you can format individual 
sectors or tracks. Every time it works on 
a disk, it backs up the granule allocation 
table and disk directory sectors 1 to 9 
on Track 17 to the unused sectors 10 to 
18 on the same track. Now if the demon 
strikes Sector 2 and wipes out your 
granule allocation table, there is a 
chance for recovery. Find out which 
sectors are wiped out (generally only 
one or two), and use KDSK to reinitialize 
only those sectors. Then have KDSK 
move the hidden directory back to 
sectors to 9. 

Want to copy only certain programs 
off RAINBOW ON DISK to your working 
disk? KDSK prints a lettered directory 



and asks you to type only the letters 
corresponding to the files you want 
copied. When you press ENTER it goes 
off and copies all indicated files — fast. 
Kill works the same way. Want to 
format a disk as double-sided, 40-track 
using RS-DOS, perhaps to use with 
JDOS or ADOS? kdsk can do it. In 
fact, it can make a double-sided 40 with 
MS-DOS format. 

Another capability is to make a 
master file of all your disk files and print 
a sorted list complete with disk number 
and other data. And of course it has the 
basic utilities to work on individual disk 
sectors for dumps, changes and the like. 
My KDSK registration number is #000 1 7 
and the disk goes into my Hall of Fame 
alongside my Serial #121 Telewriter 
cassette. Next time you are on rain- 
bow's Delphi CoCo SIG, download 
KDSK from the Database Utilities sec- 
tion. 

There is a large amount of graphics 
material on Delphi. Much of it is stored 
in the MAXCMP format developed by 
Art Flexser and Mike Ward. A PMODE 
4 picture is compressed and stored in 
DATA statements in a BASIC program 
that decodes the data and re-displays 
the graphic when run on your computer, 
fne program has subroutines to save 
the graphic to disk as a standard binary 
dump. The software can handle double- 
screen Graphicom and Colormax pic- 
tures. Though generated on CoCo Is 
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and 2s, all pictures I have downloaded 
run fine on my CoCo 3. 

There is a considerable number of 
digitized pictures and the software to 
print them using Epson or Epson- 
compatible printers. This did me little 
good, as I have Radio Shack printers. 
However, recent additions to the SIG 
include software to display converted 
digitized pictures using the CoCo 3 640- 
by-192 screen. For those into digitized 
pictures, this is a big step forward. 

Even more spectacular are Apple 
Macintosh pictures that can be loaded 
and viewed on a CoCo. Macintosh 
pictures are 512 pixels wide and a 
number of times longer than 192 lines, 
so only a portion can be viewed at a 
time. On a CoCo 3 in the 640-by-192 
mode, viewing is far more satisfactory. 
Files and software are in the Graphics 
portion of the Delphi CoCo SIG data- 
base. 

Here is a hint that can save lots of 
money if you are new to the CoCo SIG. 
Open your terminal package buffer and 
read through program descriptions as 
fast as possible. When the buffer nears 
full, save it to a file on disk, clear the 
buffer and continue reading. If you are 



using GETerm, the buffer holds about 
39,500 characters, so you can get a good 
quantity at a time. Still, it took me five 
full buffers to do most of the Graphics 
section. 

Next, use a program like Lister (in- 
cluded here) to print the files on your 
printer. Now you can read the descrip- 
tions at your leisure without running up 
Delphi charges. To access a particular 
program, enter the Database section 
and type R and the first few characters 
of the description's name. Where the 
name is not unique, find one before the 
one you want that is unique and read 
back from there until you reach your 
target. 

Here is another money-saver. If you 
plan to do explorations of what is on 
Delphi, buy a 1200 baud modem before 
you start. Since the charge is the same 
whether you use 300 or 1200 baud, you 
download much more material per buck 
at 1200 baud. You can easily save the 
price of the modem in the first month. 

BASIC programs specifically for the 
CoCo 3 are starting to show up. Some 
are good and some are not. Some are 
reworks of CoCo 1 and 2 BASIC pro- 
grams and try to use CoCo 3 features. 



Frankly, it only took me five minutes to 
get quite tired of a flashing menu line. 
The words are hard to read. It's one 
thing to have neat new features, but it 
is quite another to use them to maxi- 
mum advantage. 

And we have color troubles in CoCo 
City. A program written for TV or color 
composite video can be unusable with 
the CM-8 monitor. I worked a while 
with a disk indexing program that 
changed foreground and background 
colors for each new screen. The 80- 
column buff characters on a light blue 
background cannot be read. I can't 
believe the author saw this screen in 
these colors. I have not tested the 
program on a composite monitor, but 
I think the problem involves differences 
in ways composite video and the CM- 
8 display certain color numbers. 

We never had these problems before. 
CoCo 1 and 2 colors were so few, I stuck 
with an amber monitor and did not 
bother with software that used colors 
that looked the same on the monitor. 
Artifact colors left me cold as well. I felt 
if something could not be done right, 
then let's not bother with it at all. Now 
with so many colors available and two 




MAGAZINE EOR COLOR COMPUTER USERS. 



Spectrogram Magazine provides useful and interesting support 
material with a wide range of programs and articles by some of 
the best writers and programmers available. 

'TELEGRAM by Bobby Ballard: A monthly column concern- 
ing the Color Computer and its use in telecommunications. 
'DOWNTIME by Rush Caley: Little-known facts, new and 
different ideas, opinions, and an occasional criticism or two. 
*BASIC HELP by Bill Bernico: Answers to your questions 
concerning the Color Computer and the BASIC language. 
«PASCAL PROGRAMMING by Delmar Searls: An in-depth 
study of Pascal and how to use it effectively. 

Assembly, C, OS 9, REM statements as data storage, floating 
point math, and graphics animation are covered with an emphasis 
on understanding. Utilities, games, business and home management 
programs are a steady diet, and all the programs in Spectrogram 
are available on tape or disk. Spectrogram Magazine could become 
the most informative addition to your Color Computer system! 



PLEASE SEND ME 12 ISSUES OF SPECTROGRAM MAGAZINE 
FOR $18 (40% off the cover price). 

Name: _ . 



Address: 



City:_ 
State: , 



Zip:. 



( ) Check enclosed 

Card I 

Mail to: SPECTROGRAM MAGAZINE 
P.O. Box 138 (815)968-9600 
Rockford. IL 61105 

foreign subscriptions: $26 Canada, others $34 U.S. Currency 
U.S. Groups: $15 with 5 or more subscriptions 



( J Visa ( ) MasterCard 
Exp. Date: 




ALL SOFTWARE C0MPATABLE WITH C0C03 
HO FATCHES REO.UIRED 

# COLOR BANKBOOK *3 * $19.95 

• BUSINESS BANKBOOK $49.95 

SPECIFY 1 OR £ DISK DRIVES 

9 TV BLACKOUT BINGO * $19.95 



OCR FILE 







SUPERDISK UTILITY 

SEE REVIEW IH MAY '«S 
RAINBOW PA&E I'M 

RflDIOLOG 

SEE REVIEW IH MAY 'SB 
RAINBOW PAGE £09 

CODE PRACTICE 

SEE REVIEW IH NOV 'SG 
RAINBOW PA&E 13-1 

ORDERS OR IHFORMATION 

CALL 1-800-628-282B 
EXTENSION 552 

ALL PROGRAMS INCLUDE MANUALS , 
REQUIRE 3£K AND 1 DISK DRIVE. 
ADD te.OO SHIPPIH6 4 HANDLING 
FLORIDA RES. ADD 5r! SALES TAX 



* 19.95 

* 9.95 

S 9.95 

* 9.95 



-© 



QCEC33JEg 



RAINBOW 

ct Pimento* 
HM 



* 



8901 NW 26 ST DEPT 
SUNRISE, FL 33322 

NCLUDES SPECIAL EDITION FOR C0C03 
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different display systems and a natural 
tendency to use it all, we have problems. 

First, authors must resist the ten- 
dency to get too cute in software they 
want others to use. Character-oriented 
software should be legible first. Then 
some careful dressing up can be tried. 
Stick with basic colors and assure good 
contrast in both composite and analog 
systems. I think it is definitely OK for 
the software to ask if CMP or RGB 
display is being used and set the palette 
accordingly. RGB, CMP or TV versions 
of a program may be an answer. In the 
case of TV, 80-column characters are 
not legible and the left two or three are 
chopped off by the TV. 

So the author is left with the dilemma 
of whether to write the program for 
everyone, for one or the other monitor 
systems or for monitors as a group 
without TV compatibility. 

Greg Miller went so far as to provide 
for nine different display choices with 
his Greg-E-Term terminal program. 
Three of these options are for the CoCo 
3 while the rest support CoCo Is and 2s. 
In the CoCo 3 mode, GETerm lets the 
user choose foreground, background 
and border colors. In addition, the user 
can configure many other parameters to 
tailor GETerm to a specific communi- 
cations system. The configured pro- 
gram is then saved to disk and is all 
ready to go when next loaded. 

In a lot of other ways, GETerm turns 
out to be one of the nicest terminal 
packages I have used. It supports a solid 
Xmodem protocol that works well with 
Delphi, even when Delphi takes an 
extended break to service other users. 
Fortunately, this happens infrequently. 



but when it does GETerm patiently 
waits till Delphi returns. Otherwise, the 
error rate has been extremely small 
working 1200 baud through CoCo 3's 
serial port. GETerm can be downloaded 
using Xmodem from the Communica- 
tions section of the Delphi CoCo SIG 
database. 

Whatever the display system choice, 
that choice should be stated and the 
software must be tested to assure that 
it works as advertised. 



'"Fragmentation 
within the CoCo 
System is hardly 
unique in the 
computer world. " 



If you can get into trouble with color 
in character-oriented work, think of the 
can of worms the graphics world faces. 
The Tandy CoCo 3 demo is a case in 
point. Certain sequences just do not 
work on CMP and TV. Red grass 
doesn't cut it. Of course the demo exists 
to showcase the CoCo 3 and the CM- 
8 and it does the advertised quite well. 

RAINBOW has categorized programs 
for years, using amount of memory, and 
whether disk or tape are used, as the 
parameters. The CoCo 3 requires at 



least a display parameter. I propose All, 
TV&CMP, CMP and RGB. Of course 
such descriptors should appear on 
information services such as Delphi, as 
well. 

I am calling for categorization of 
CoCo 3 software, since I do not feel a 
multi-mode monitor stands a chance. 
Sure, they are out there and can be 
made to work, even as a TV to watch 
those wonderful artifacted colors in 
PMDDE 4. And a small percentage of 
CoCo 3 owners will choose that route, 
although no one in my group of CoCo 
3 owners has shown the slightest inter- 
est. And I am not about to spend the 
bucks or put up with the hassle. I don't 
think many others are, either — at least 
not right now. 

Fragmentation within the CoCo Sys- 
tem is hardly unique in the computer 
world. The MS-DOS community had a 
nice standardized system for a number 
of years. That is coming apart with 
multiple graphics systems and new 
machines that are incompatible with 
earlier ones. There's been an explosion 
of choices and it is hard to tell which are 
important to consider and which are 
inconsequential, much less deal with the 
important questions. 

Well, we had a nice standardized 
machine and have fussed for something 
better for years. Now we have it and we 
need to do some work to make the most 
of our new options without overdoing 
to the point that things become cute. 
My worst fear is that color will be used 
for its own sake and functionality will 
be compromised. Things like that will 
turn off current and potential users 
fast. O 



The listing: LISTER 

1 'LISTER- A PROGRAM TO LIST AN 
ASCII FILE TO SCREEN OR PRINTER 
10 PRINT" LISTER IS SET UP NOW FO 



R 9600 
R. IF 
BAUD, 
N LINE 
E OTHER 
DELETE 

PROGRAM. 
20 CLEAR 800:POKE150,1 
30 LINEINPUT "FILE NAME? (PRESS 
<ENTER> FOR DIRECTORY) " ; F$ : IFF$= 



BAUD RATE TO THE PRINTE 
YOUR PRINTER RUNS AT 60 
DELETE THE POKE 150,1 I 
20. IF YOU PRINT AT SOM 
BAUD, CHANGE THE POKE, 
LINE 10 AND RESAVE THE 



"?"ORF$=""THENGOSUB120 

40 PRINT"SCREEN OR PRINTER? (S/P 

) "; :GOSUB110:DV$=B$:IFDV$="S"TH 

ENDV=0ELSEDV=-2 

50 CLS:IFDV=-2THENPRINT: PRINT: PR 

INT"printing " 

60 OPEN "I" ,#1,F$ 

70 LINE INPUT #1, A$ 

80 PRINT#DV,A$ 

90 IF EOF(l)=-l THEN PRINT"end o 

f file"; :CLOSE#l: END 

100 GOTO 70 

110 B$=INKEY$:IF B$="" THEN 110 

ELSE RETURN 

120 PRINT"DRIVE#? " ; : GOSUB110 : IF 

VAL(B$)>3THEN120ELSEDIR VAL(B$) : 

GOTO30 



/R\ 
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KISSable OS-9 



Rambo Takes Us 
Back to the Beginning 

By Dale L. Puckett 
Rainbow Contributing Editor 



Back in October of 1983 we bor- 
rowed the title for this column 
from that famous acronym, 
KISS, short for Keep It Simple Stupid. 
Our intention was to write a column full 
of tips that would indeed make OS-9 
simple to operate. Yet, on many occa- 
sions our enthusiasm for new and excit- 
ing tools got in the way and we did 
everything but keep it simple. 

This month a letter from Michael H. 
Rambo inspired us to get back on track. 
Mr. Rambo wanted true lowercase 
characters on his Color Computer 
screen. He owned the 'B' version with 
the new 6847T1 VDG. With ADOS he 
was able to make it happen. By the time 
he had switched to OS-9 he was spoiled. 
He wanted to keep his lowercase char- 
acters. 

With ADOS he switched modes by 
storing Hex 55 at SFF22. Not to be 
fooled, he jumped right in and wrote a 
Hexdump program in BAS1C09. Then, he 
searched for and hand disassembled any 
code in the OS-9 memory modules that 
made reference to SFF22. Let me tell 
you, Michael has a lot more patience 
than 1 do. His hand disassembly looked 
accurate. He even got it to work — 
partially. By changing a byte at S3D5 in 
the CCIO module that comes with 
Version 2.00.00, he was able to get OS- 
9 to boot up from his modified ADOS 
with the lowercase and inverse video 
screen he wanted. However, every time 
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he did a warm reboot by pressing the 
reset button he would lose his lowercase 
screen. He wrote us looking for a 100 
percent reliable method of patching OS- 
9. 

The secret is not to patch. OS-9 
Version 2.00.00 gives you a utility 
named tmode which is tailor-made for 
the job. You use this tool to tell OS-9 
what your hardware looks like. For 
example: 

DS9: tmode upc -pause 

This command line tells OS-9 you 
want the terminal on the standard 
output path to print only uppercase 
letters and you do not want it to stop 
and wait for you to give it a go-ahead 
at the end of a screen page. The follow- 
ing command will do just the opposite. 

059: tmode -upc pause 

After giving this command, OS-9 
pauses and lets you catch up on your 
reading after it fills your screen. And, 
it prints lowercase letters on your screen 
as lowercase — true lowercase if you 
have one of the newer machines and use 
the trick we are about to show you. 

The solution to Rambo's problem 
rests with tmode's type parameter 
which is used to tell OS-9 how to 
initialize the ACIA chip in the Radio 
Shack RS-232 program pack and how 
to set up your Color Computer screen. 
This month, we'll stick to the screen. 

The information that defines your 
screen is stored in bits and I in the type 
byte. If Bit is off, OS-9 will not know 
that your machine has true lowercase 
capability. If Bit is on, OS-9 recognizes 
that your machine has a chip that can 
generate true lowercase characters and 
will govern itself accordingly. 

Bit I of the type byte tells OS-9 the 
width of your screen. If Bit I is clear (or 



zero) OS-9 knows that your screen is 32 
characters wide. That is the case when 
you are using the true lowercase capa- 
bility of the VDG chip. If you are using 
one of the hardware program packs that 
generate an 80-column screen you will 
want to set Bit I. Let's look at a couple 
of examples. 

0S9: tmode type=0 

After you type this line, the path 
descriptor on the standard output path 
will be set up for a 32-column screen 
that does not have true lowercase cap- 
ability, i.e., an older VDG chip. 

0S9: tmode type=l 

This command tells OS-9 that your 
machine has the proper VDG to gener- 
ate true lowercase characters. 

0S9: tmode type=3 

If you type this command, OS-9 
thinks your screen can generate true 
lowercase characters and is 80 charac- 
ters wide. This condition would be true 
if you were using a hardware program 
pack that outputs 80 columns. But. 
there's a gotcha! If you just type tmode 
type=l alone, OS-9 will not automat- 
ically switch you into the true lowercase 
mode. To make this happen you must 
issue two commands. Do it like this: 

QS9: tmode type=l 
DS9: display e 

Or, like this: 

D59: tmode type=l ; display e 

The moral of our story — don't use 
a sledge hammer to kill a flea. Take the 
time to study the documentation. A 
small investment here can often save 
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you much time. I must confess I was 
unable to find the fact that I needed to 
type display e to make the switch 
anywhere in the documentation that 
came with the Version 2.00.00 upgrade. 
I found it by trial and error. 

Turning off /DO 

Last month we showed you how to set 
up a system disk for your hard disk 
based OS-9 computer that will operate 
without the floppy disk device descrip- 
tors and device driver, ccdisk. By 
removing these and other unused mod- 
ules from your 0S9Boot file you can 
really trim your system and make more 
memory available for your programs. 

You can still boot up from a floppy 
startup disk because the boot module 
stored on Track 34 of your Radio Shack 
system disk contains the code you need 
to talk to the disk drive mounted in slot 
/d0. There is one small detail that you 
will want to take care of, however. For 
long-term operation in this mode, you 



need a way to turn off the floppy drive 
in the slot normally named /d0. 

Since you have removed the /d0 
floppy device descriptor module from 
your 0S9Baot file and are using the 
name /d0 for your hard disk descriptor, 
you don't have a way to talk to the 
floppy disk drive to tell it to shut off. 
But, think again! Where there's a will, 
there's a way! 

The quick and dirty way to turn off 
the motor on the floppy disk drive is to 
use the OS-9 debug utility. Try this: 

0S9: debug 

Interactive Debugger 
DB: .SPACE BAR f f40 ENTER 

FF40 FF 
DB: =00 ENTER 
ERROR 11010 

FF40 FF 
DB: q ENTER 

Shortly after you type =00 you'll 
notice the red LED go out on your drive 



and hear the motor stop running. That's 
easy enough. In fact, you could even run 
debug from within your startup file 
using a script containing the debug 
commands we typed manually above. 
However, it wouldn't look very elegant 
— and most important, it would steal 
several seconds of your precious com- 
puting time from you every time you 
boot your system. 

Wouldn't you rather have a short 
machine language program you could 
run automatically from your startup 
file? Let's go for it. Besides, it gives us 
a chance to give many of you an intro- 
ductory look at the OS-9 assembler, 



Getting Started With Asm 

When you start a programming pro- 
ject you enter a do loop. Regardless of 
the language, whether it is low-level like 
6809 assembly or high-level like 
BASIC09, PASCAL and C, there are at least 
three steps you will find yourself repeat- 



Listing 1: driveoff 

ifpl 

use /d{3/defs/os9defs 

endc 

mod length , name , prgrm+ob j ct , reent+ 1 , start , 


datasize 




fcb 1 Edition Number 

fee /From KISSable OS-9, April 1987/ 

start clra 
sta Sff40 
clrb Clear Error 
os9 fSexit Return to Shell 


rmb 200 reserve for stack 








emod 


datasize equ . 
name fcs /DJ30ff/ 








length equ * 
end 


Listing 2: driueoff. listing 








00001 
00003 
00004 
00005 0000 87CD003C 




ifpl 
endc 

mod 


length , name , prgrm+ob j ct , reent+1 , start , dat 


00006 

00007 D 0000 

00008 

00009 D 00C8 

00010 

00011 000D 44304F66 

00012 0012 01 

00013 0013 46726F6D 


datasize 
name 


rmb 

equ 

fcs 
fcb 
fee 


200 reserve for stack 

/D0Off/ 

1 Edition Number 

/From KISSable OS-9, April 1987/ 


00014 

00015 0031 4F 

00016 W £032 B7FF40 

00017 0035 5F 

00018 0036 103F06 


start 


clra 
sta 
clrb 
os9 


$ff40 

Clear Error 
f$exit Return to Shell 


00019 

00020 0039 5F6D14 

00021 

00022 003C 

00023 


length 


emod 

equ 
end 


* 


00000 error (s) 

00001 warning (s) 

5003C 00060 program byt 
$00C8 00200 data bytes 
$13A3 06307 bytes used 


es generated 
allocated 
for symbols 
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ing many times. In a pseudo-language 
it might look like this: 

While Your program doesn't run 
properly Do 

Enter or Edit the Source 
Code file 

Assemble or compile into 
object code 

Debug the object code using 
your system debugger 
EndWhile 

When the loop above gets to this 
point your program most likely runs 
properly and it is time for you to write 
the documentation so everyone can use 
it. 

Most common OS-9 asm command 
lines look something like this: 

059: asm ttlBK driveoff o 

If you type this command, OS-9 will 
load in your assembler from your cur- 
rent execution directory — 'DO'CIIDS. 
It reserves 18,432 bytes or 18K of 
memory for the assembler to use for 
data storage. It assembles a file named 
driveoff which it assumes you have 
stored in your current data directory. 
When it is finished, it will have created 
a file in your current execution direc- 
tory, /D0'CMDS. That file will contain 
an OS-9 module which you can load 
and run from the OS-9 prompt. 

Why did you need to ask for more 
memory on the command line? That's 



a good question. Unfortunately, the 
OS-9 asm command only asks for 4,096 
bytes of data memory when it comes 
alive. Because you usually need to 
assemble the 059De f s file each time you 
assemble a program, 4,096 bytes isn't 
enough. You need at least 16K. of mem- 
ory for all but the shortest of programs. 

Incidentally, you can permanently 
change the amount of memory asm 
requests by changing the 12th and 13th 
byte in the asm file with a utility like 
Patch from Computerware. For exam- 
ple, if you change the two Hex bytes, 10 
and 00, which are stored there now to 
3F FF, asm will automatically request 
16K of memory when it starts up. 

If you don't own Patch, you can 
accomplish the same thing with debug. 
First, load asm into memory. Then run 
debug and link to asm with the 1 
command. Then change the two bytes 
and exit the debugger. When you see the 
OS-9 prompt again, save the asm mod- 
ule in memory into a temporary file and 
verify it to update the CRC. 



059: save •'d0/cmds-'Cemp 
asm ENTER 

0S9: verify <-'d0-'cmds''temp> 
•'d0''cmds'Neuj.Asm u ENTER 

059: del •'d0- / cmds-'asm ENTER 
05.9: rename ^d0''cmds''neui 
.asm asm 



But we said we would keep it simple 
this month! Let's get back on track by 
playing what-if. What if you don't want 
your executable file stored in your 
current execution directory. Rather, 
you want it in a special directory you 
have set up for your hard disk project. 
Let's call that directory HDPR0JECT. 

Notice how we always type the name 
of our directories with all capital letters 
when we create them. This lets us tell the 
difference between a standard file and 
a directory file with a quick glance at the 
screen. Also, let's assume that you want 
a hard copy listing of your assembled 
source code to help you spot any logic 
errors. Do it this way. 

0S9: asm B1BK driweoff L o=/d0 
■'hdp ro j ec t/d0o f f>''p 

The next time you run asm, you 
change your mind. You want to save the 
listing of your assembled source code in 
a file. You'll find time to look at it later, 
maybe. Besides, you don't need an 
object code file this time. You didn't 
really want to run the program, you just 
wanted to study the technique. 

059: asm ttlBK driveoff L> 
driveof f . 1 is ting 

Notice that we typed an uppercase L 



Listing 3: IOMan. patch 

* Either do the following manually, or use it as a shell procedure file 



to make your new IOMan: 



* Save the old ioman, and change it's name in memory: 

save /dj3/ ioman. old ioman 

debug 

L ioman 

. .+D 

=41 

* Load an ioman so we have extra space to play with: 

$load /d0/ioman.old 

L ioman 

. . + 3 

=1D 

L ioman 

. .+8 

=E2 



* Fix known ioman bug: 

L ioman 
. .+6BB 
=12 

=E1 
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so you couldn't confuse it with the 
number 1. Feel free to type a lowercase 
T on your own command line if you 
would like. Remember these points and 
you should get along with the OS-9 asm 
command. Always ask for at least I6K 
of memory when you run the assembler 
unless you are not assembling the 05- 
9De c s file with your program. Always 
put the o for object code parameter on 
your command line if you want a file 
you can run later. And finally, always 
put the 1 for listing on the command 
line if you want asm to generate a listing 
you can study. 

Looking Inside 

Now that you know how to call asm 
from the OS-9 command line, let's look 



inside a short sample program. Since we 
still need a program to turn off drive 
,'dO in a system without a device des- 
criptor by that name we'll tackle that 
problem. 

Listing 1. driveof f, is a simple OS- 
9 assembly language program. In fact, 
this program only does one thing. It 
writes a zero to the location SFF40 in 
your Color Computer. This is the ad- 
dress of the multipack interface where 
you plug in your disk controller. 

We picked this very short program so 
you would have a model or "shell" you 
can use to build your own programs. 
You will need all of the parts we have 
included in our listing in every OS-9 
assembly language program you write. 
Since our program was designed to give 
you a model we have used generic 
names that you can use in any program. 
Listing 2 is how our program looked 
after we ran it through asm. 

The first column of numbers you see 
in the assembled listing are merely line 
numbers. These line numbers are used 
in error messages and can help you spot 
a syntactical problem in your code. The 
next column shows the offset of the 
code generated by each line in your 
program within the actual module 
generated by the assembler. For exam- 
ple, if you use the dump utility to dump 
the object code file you generated, you 
would find the d in d8of f represented 
as 44 Hex, exactly 13 — or D in Hex 
- bytes from the start of your file. If 
you loaded the file driveof f and used 
debug to examine the module d0of f in 
memory you would also find the D at 
the same offset. 

The next column of Hex code dis- 
played in the assembled listing shows 
the actual 6809 object code, in Hex, that 



* Insert lbra to patch: 

L ioman 
. .+4BE 
= 17 
=02 
=4F 

* Now add the patch: 

L ioman 

. .+710 

=3D 

=B7 

=FF 

=D8 

=AD 

=8B 

=B7 

=FF 

=D9 

= 39 

* Plus new crc: 

=70 
= DF 
=FF 
save /d0/ ioman. tmp ioman 

* Now ident ioman to see if it is a good module. 

* If so skip the verify step and os9gen a new bootfile. 



asm generated for you. Moving to the 
right, you'll experience deja vu. This 
column contains the labels you typed in 
the very first column of your original 
source code. Next, you see a column 
containing the operators or pseudo- 
operators you typed followed by a 
column containing the operands you 
entered. Asm has put your comments in 
another neat column. 

We'll switch our orientation now 
from columns to rows. Notice the dif- 
ference between the first three rows of 
our source code listing and the first two 
lines of the assembled listing. The 
assembler has left out the line use 'd0' 
defs^osSdefs. It did this because the 
first line in the file DS9Defs contains 
opt -1 which turns off the listing. It 
isn't turned on again until after the 
entire DSSDefs file is assembled. For 
this reason you may want to insert a 
comment line in your own source code 
to remind yourself what you wrote 
there. 

The conditional statement i f pi or "if 
pass one" lets the assembler read the 
059Defs file on its first pass but causes 
it to skip it on the second pass. Once the 
assembler has recorded the information 
in the 0S9Defs file in its symbol table, 
it doesn't need to see it again. Note here 
that if you are using asm you must 
always have the DEFS directory availa- 
ble on drive /dO. And, the file DS9Defs 
must be stored in that directory. 

The next line of our program is the 
one that creates the standard OS-9 
module header. You will see this same 
line, or something very similar, in 
almost every OS-9 assembly language 
program. 

If you use the OS-9 dump utility to 
look at the object code in d0of f after 



verify u </dj3/ioman. tmp >/dj3/ ioman. new 
del /dfi/ ioman. tmp 
attr ioman. new e pe 

* Now os9gen a new boot file using ioman. new in place of the original. 

* Reboot and try some disk I/O fuctions. If every thing is working fine then 

* you are running at 2 MHz except for direct driver calls. IRQ driver code 

* stays at 2MHz in this version. 



200 



THE RAINBOW April 1987 



you assemble it, you will quickly see 
what the mod statement does for you. 

The first two bytes in your object 
code file will be 87 CD Hex. In fact, you 
will find that they are the first two bytes 
of every OS-9 memory module. The mod 
operator puts them in each module for 
you. 

The next two bytes are 003C. Now 
look at the offset in the second column 
of your assembled listing. That's inter- 
esting! The offset at the label named 
length is 003C also. Now look at name. 
The listing says it is at an offset of 000D. 
What value do you see in the listing you 
"dumped" on your screen? I'll bet it's 
000D. The same pattern should hold 
true for the labels named start and 
datasize. 

Asm finds the value of prgrm, objct 
and reent in the 0S9Defs file you 



called in with the use statement in the 
second line of your source code. If you 
look at the dump of d0of f, you will see 
that prgrm+objct is 11 Hex and 
reent+1 is 81 Hex. This means that 
prgrm has a value of 10 Hex and objct 
has a value of 01 Hex. Likewise, r-Bent 
must have a value of 80 hex. List out 
the DS9Defs file and sec if this is true. 
You see, there really is a very logical 
design behind OS-9. That's why it's so 
effective. 

Notice that on every OS-9 assembly 
language program you write you will 
need to reserve at least 200 bytes of 
memory for use by the stack. This is in 
addition to the memory you need for 
your own program. The program 
driv/eoff did not require any data 
memory. While you're looking at that 
part of the listing however, note that the 



assembler has printed a D adjacent to 
the part of the listing that applies to data 
storage. 

The U flag you see in that same 
column was put there to warn you that 
you directly addressed a fixed point in 
memory in that line of the code. This 
practice is taboo in OS-9 programming. 
However, we got away with it here 
because we are writing to a fixed hard- 
ware memory location that never 
changes. 

The fes operator generates a string 
of characters in memory. The last byte 
of that string has its eighth bit set. It is 
standard practice to put the edition 
number immediately following the 
name. The character string generated by 
the Fee operator doesn't do anything 
other than identify the source of the 
program in the object code file. 



Listing 4: terminal. asm 

nam Terminal 

ttl Dumb terminal program 

ifpl 

use /h0/defs/defsfile 

endc 

mod Size, Name, Prgrm+Ob jet, Reent+1, Start, MemSize 

***************************************** 
* 

* A very fast dumb terminal capable of 

* running 2400 baud rather effeciently 

* under OS-9 vr. J32.00.00 on AciaPak. 

* Some trickery was needed in order to 

* acheive this high speed, such as 

* having AciaPak send a signal on every 

* character sent, reading and writing 

* an entire buffer at once, and the 

* super high speed poke. This may not 
work on all CoCo's but it works great 
on my F board, mainly because we are 
constantly accessing memory which 
keeps it refreshed. If any sleep were 
performed the contents of memory 
would be lost. Designed mainly for the 
newer CoCo 3 which is highly capable 
of running in the high speed mode but 
may also work on others but there is 
no guarantee made. Use control Z to 
exit. The command line should look 
like 'Terminal /T2 • . . . 



Name fes /Terminal/ 
feb 1 

CommPath rmb 1 Path number for the modem 

ParamPtr rmo 2 Parameter pointer 

Buffer rmb 256 Temporary buffer 

CommOpt rmb 3 2 Modem options 

CommSave rmb 3 2 Saved copy 

TermOpt rmb 32 Terminal options 

TermSave rmb 32 Saved copy 

Stack rmb 10*1024 A HUGE stack just in case 

MemS i z e equ . 

Trap bsr ChekComm Check modem for data 
rti 



Start sta Sffd9 Set super high speed 
stx ParamPtr Store parameter pointer 

Ida S%00000011 * wr 

os9 ISOpen 

lbcs ErrExit 

sta CommPath Store path for /t2 

leax Trap, per Get address of intercept routine 

os9 FSIcppt Set it in OS9's tables 

Ida CommPath 

ldb SSS.Opt 

leax CommOpt, u 

os9 ISGetStt 

leax CommSave, u 

os9 ISGetStt 

Ida #1 

leax TermOpt, u 

os9 ISGetStt 

leax TermSave, u 

os9 ISGetStt 

lbsr Setup 

Ida CommPath 

**************************************** 
* 

* Tell AciaPak to send us a signal to 

* let us know when data is ready for 

* us to pick up with the Read call. 
* 

ldb #SS.SSig 
ldx #50010 
os9 ISSetStt 

**************************************** 
* 

* Main loop: Poll the keyboard and 

* the modem. We do this in spite of the 

* intercept routine also polling the 

* modem to obtain our quick speed and 

* there appears to be occassions when 

* AciaPak does not send the signal. We 

* use this routine to again tell AciaPak 

* that we need the signal, keeping 

* everything in sync. 
* 

Loop bsr ChekTerm 
bsr ChekComm 
bra Loop 

****************************************** 
* 

* Poll the keyboard and write any data found 

* to the modem. 
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When you run the program d0off, 
OS-9 executes the code beginning at the 
label start. The emod operator tells 
asm that it has reached the end of an 
OS-9 module. The next line of code 
generates the length of the module for 
use by the mod operator above. 

Let OS-9 Do It for You 

The beauty of programming in as- 
sembly language using a powerful op- 
erating system like OS-9 comes from the 
fact that the operating system itself 
gives you a rich assortment of system 
calls that do all the nasty little program- 
ming jobs for you. All you have to do 
is set up the registers and use the OS- 
9 pseudo-operator to tell asm to let the 
system do it. 

For example, we could use the follow- 
ing sequence of code to print the KIS5- 



able OS-9 string in our program. First, 
we would need to put a label in front 
of the string, like this: 

string Fee /From KISSable OS-9, 
April 1987' 

Then, we could generate the following 
code. 



ldy U30 
Ida HI 
os9 ISuiri te 
bes error 

We have loaded the 6809's Y register 
with the length of our string, loaded the 
A register with the number of OS-9's 
standard output path and called the 
ISurite I/O system call. 



Don't Mix Systems 

A letter from Bill Burchell of Mis- 
sion, British Columbia, encouraged me 
to remind you of a warning we had 
published earlier in the year. Do not mix 
different versions of your OS-9 system 
disk and the utilities that come with 
them. You can wind up causing strange 
problems that will leave you scratching 
your head until you're bald. 

Burchell suggested that you can run 
OS-9 Version 1.00.00 on the CoCo 3 by 
booting first with Deskmate, exiting to 
the OS-9 shell and then changing disks. 
You can hobble along doing this if your 
local Radio Shack doesn't have the 
Version 2.00.00 upgrade in stock, but I 
wouldn't run that way too long. There 
are hundreds of subtle changes under 
the surface waiting to jump out at you 
in the form of weird errors that you'll 



ChekTerm clra 


leax Buffer, u 


ldb #SS. Ready 


os9 ISWrite 


os9 ISGetStt 


rts 


bes TermRts 




ldy #1 


Setup leax CommOpt.u 


leax Buffer, u 


clr 4,x 


os9 ISRead 


clr 5,x 


Ida Buffer 


clr 6,x 


empa #Sla 


clr 11, x 


lbeq Exit 


clr 12, x 


bsr WritComm 


clr 13, x 


TermRts rts 


clr 14, x 




clr 15, x 


**************************************** 


clr 16, x 


* 


clr 17, x 


* The first thing we do is to tell Acia 


clr 18, x 


* not to send the signal to keep ourself 


Ida CommPath 


* from wrapping in here from the Intercept 


ldb #SS.Opt 


* routine to pick up the same data and 


os9 ISSetStt 


* preventing the havoc from wreaking. 


leax TermOpt,u 


* Next, we check to see how many characters 


clr 4,x 


* are waiting in the buffer. We then read 


clr 5,x 


* the entire buffer in one fell swoop, 


clr 6,x 


* put the whole mess out to the terminal 


clr 11, x 


* (/term) and then tell Acia to turn on 


clr 12, x 


* the signalling once more. 


clr 13, x 


* 


clr 14, x 


ChekComm Ida CommPath 


clr 15, x 


ldb SSS.Relea Turn off signalling 


clr 16, x 


os9 ISSetStt 


clr 17, x 


Ida CommPath 


clr 18, x 


ldb SSS. Ready How many characters waiting? 


Ida #1 


os9 I$GetStt 


ldb #SS.Opt 


bes CommRts None, so return 


os9 ISSetStt 


clra Clear out the high bit 


rts 


tfr d,y Put waiting buffer length in Y. 




Ida CommPath 


Exit clrb Clear error 


leax Buffer, u 


ErrExit pshs b,cc Save error status 


os9 ISRead Read the ENTIRE buffer 


leax CommSave,u Restore modem options 


bsr WritTerm Go write the whole mess 


Ida CommPath 


Ida CommPath 


ldb #SS.Opt 


ldb #SS.SSig Turn signalling back on 


os9 ISSetStt 


ldx #$0010 


leax TermSave,u Restore /term options 


os9 ISSetStt 


clra 


CommRts rts Return to whence we came 


ldb #SS.Opt 




os9 ISSetStt 


WritTerm Ida #1 Stdout 


sta Sffd8 Back to normal speed 


leax Buffer, u 


puis b,cc Restore error status 


os9 ISWrite 


os9 FSExit Back to OS-9 


rts 






emod 


WritComm Ida CommPath 


Size equ * 


ldy #1 


end 
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New Low Price!! 



SAVE 
$500.00!! 

tow includes 




The QT Plus 



Save $500 on the QT Plus and get the 'C 
compiler too! Now only $2995.00 

The famous QT Plus is now more affordable 
than ever. Move up to the Professional version 
of OS9/6800 with the new QT Plus . 

The QT Plus includes a 10 Mhz 68000 with 
512K RAM, a 20 megabyte hard disk with a 
720K floppy, 4 serial ports and 2 parallel ports. 
The QT Plus is expandable to 1024K RAM, 8 
serial ports and 3 parallel ports within the 
cabinet. The software is the NEW Professional 
Version of OS9/68K with more powerful 
utilities, the uMacs screen editor and the 
languages Basic09 and the 'C compiler. In 
addition the NEW UniStar word processor 
(WordStar compatible) and the famous 
DYNACALC spreadsheet, QCom communi- 
cations and 'fbu' floppy backup packages are 
also included in the remarkably low price. 



The QT CoCo 

HOT News for CoCo Users 

The QT CoCo is a QT Plus without the 68000 
computer insides. This way you can use the QTs 
hard and floppy drive as a drive subsystem for 
your CoCo 1/2 or 3 until you want to upgrade to 



a full 68000 based QT Plus. The best part is 
that there is no loss when you do so. Contact us 
for more detailed information and watch next 
month for our ad for The QT CoCo. 

TheQT20x 

The QT 20x is our latest Super Microcomputer 
based on a 12.5 Mhz 68020 32 bit processor 
with 1/2 to 14 1/2 megabytes of RAM and 2 to 
30 serial ports/users. Other features include 
DMA, calendar clock with battery, full SCSI 
interface and much more. The software is the 
same as the QT Plus with the addition of 
Networking included! 

The QT20x with 512K RAM 2 serial ports a 20 
meg hard drive and 720K floppy is only 
$3695.00. 2 Meg/4 serial port expansion 
boards are only $800 each when ordered with the 
system. Call for other options and full specs. . 



Software List 

Sculptor OS9/68K 995.00 

Sculptor CoCo LevII 595.00 
*QT owners only 



Our Price 

695.00* 
495.00 




' ■•. ■ M ■ imtanwt erf Maonr* 



FRANK HOGG Est. 
LABORATORY 1976 



770 James St., Syracuse, NY 13203 Telex 646740 

315/474-7856 



Listing 5: mdir.c 



/» prints an extended module directory in plain english */ 
/* copyright (c) 1986 by Gregory A. Law */ 
4 include <stdio.h> 
it include <ctype.h> 
if include <time.h> 



main() 
( 



unsigned «mod_ptr = 0x0026; 
unsigned "mod_end = 0X0028; 

struct ( 

unsigned mod_addr; 

char link; 

char dummy; 
) *mod_dir - *mod_ptr; 

struct sgtbuf time; 



/* pointer to module directory 
/* pointer to last module entry 

/* module directory pointer 

/* module address 

/* module link count 

/* this byte apparantly unused 



V 



getime(Stime) ; /* Get the system date and time 

printf(" Module directory at %02d:%02d:%02d\n\n", 

time.t_hour, time. t_minute, time. t_second) ; 
printf ("Addr Size Owner Type Language Revs Ed $ Link Module na 
printf ("==-= -=== - 



while(mod_dir.mod_addr < *mod_end) ( 
if (mod_dir->mod_addr 1= 0) I 



/* Range for module dir */ 
/* Is module stil there? */ 



printf ("%4X ", mod_dir->mod_addr) ; /* module address 
get_info(mod_dir->mod_addr, mod_dir->mod_addr, 
mod_dir->link, mod_dir->dummy) ; 



) 

mod dir++; 



/* Increment pointer to structure */ 



) 

/* This routine does the blunt of the work. It uses the pointers created 
/* the main routine to pull out the information in the module header. It 
/* then calculates the physical address of the module name and passes it 
/* to another routine for fetching. 



get_info (module, address, link, ed_num) 

unsigned *module; 

unsigned address; 

char link; 

char ed_num; 

I 



/* Pointer to the module header 
/* Address of the module header 
/* Value of the link count 
/* Value of the unused byte 



unsigned attr, revs; 

unsigned type, lang; 

int dummy; 

unsigned offset; 

dummy - »module++; 

printf ("%4X %5d " , «module++, ed_num) ; /* mod size & owner 



offset = "module*-*-; 
type = *module & 0xf000; 
lang » "module S 0x0f00; 
attr = 'module S 0x00f0; 
attr /=■ 0x10; 
revs = "module & 0x000 f; 



switch(type) ( 

case 0x1000 

case 0x2000 

case 0x3000 

case 0x4000 

case 0xc000 

case (3xd000 

case 0xe000 

case 0xf000 

default: 

) 

switch(lang) ( 

case 0x0000: 

case 0x0100: 

case 0x0200: 

case 0x0300: 

case 0x0400: 



printf ("%-14s 

break; 

printf("%-14s 

break; 

printf ("*-14s 

break; 

printf ("%-14s 

break; 

printf ("%-14s 

break; 

printf("%-14s 

break; 

printf ("%-14s 

break; 

printf ("%-14s 

break; 

printf ("%-14s 



printf ("%-lls 
break; 

printf ("%-lls 
break; 

printf ("%-lls 
break; 

printf ("%-lls 
break; 

printf ("%-lls 
break; 



/* Get the offset to the name 

/» Get the module type code 

/* Get the language code 

/* Get the attributes byte 

/* Make the attributes $00 - $0F 

/* Now get the revision count 

/* Figure out the module type */ 
"Program") ; 

"Subroutine") ; 

"Multi-module") ; 

"Data module") ; 

"System module") ; 

"File manager"); 

"Device driver") ; 

"Descriptor") ; 

"User defined", type); 

* Figure out what language */ 
"Data") ; 

"6809 Object") ; 

"Basic09") ; 

"Pascal") ; 

"C I-code") ; 



seldom be able to duplicate and never 
be able to explain in great enough detail 
to get help. 

Everyone Loves OS-9 

ARK, Inc., 6-2, Hyakunincho 2- 
Chome, Silver Plaza Okubo DAI2 
#303, Shinjuku-Ku, Tokyo 160 Japan, 
sent me a Christmas card again this 
year. The address is new, as is the slick 
stick-on label they sent us. 

'/ LVVE' 

as-9 

I ARK CORPORATION! 

Ark, Inc., has another sticker that 
says "I Love OS-9 68000 ®." Maybe 
we'll see that one on a CoCo someday! 

Rich Perry at Speech Systems, 38 
West 255 Deerpath Road, Batavia, IL 
60501, phone 312-879-6880, must be 
thinking about OS-9 now. We received 
an advertising flyer from him last week 
that featured a Turbo Hard Disk for the 
serious OS-9 user. A half-height 10- 
megabyte unit is $599.95. You can have 
20 megabytes for $699.95. The flyer said 
to order OS-9 Level I or II for your 
CoCo 1, 2 or 3. Perry also featured a 
Turbo RAM for the CoCo 3. "Ideal for 
OS-9 Level II," it reads. Good things are 
on the horizon. 

April Listings 

We have a gold mine for you this 
month. Listings in Assembly Language, 
BASIC09 and C plus a special CoCo 3 
procedure file take the spotlight. They 
come from Steve Croom, Dennis Duke 
and Greg Law. 

Here's a patch from Steve Croom 
that will let you modify the IDMan 
module in OS-9 Level I, Version 2.00.00 
for use on the CoCo 3. When you use 
it, your Color Computer and multipack 
interface will run smoothly at 2 MHz. 
When one of your programs makes an 
I/O call, this patch will cause OS-9 to 
slow down your system clock to .89 
MHz. As soon as the call is completed, 
it will switch back to 1.8 MHz. 

Terminal is a dumb terminal that 
can run up to 2400 baud effectively. It 
is designed mainly for the CoCo 3 and 
will work only with Version 2.00.00 and 
the AciaPak. The ACIA driver must 
support the SS.SSig Set Status Call. It 
works great with an 80-column card but 
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may cause some garbage to be printed 
on your screen if you run it with C032 
on a CoCo 1 or 2. 

We also have mdir, a utility you can 
read in English. And, its output is 
pleasing to the eye. Tip your hat to Greg 
Law for this C listing. 

How many times have you down- 
loaded a file with the Desk/note, or 
other terminal program, only to wind 
up with an extra line feed at the begin- 
ning of every line. Worry no more! 
Strip. c will remove them for you. You 
can edit them out by hand with your 
editor, but it's a whole lot easier this 
way. 

OS-9 Users Group President Resigns 

We have learned that OS-9 Users 
Group President Brian Lantz has re- 
signed for personal reasons. Lantz is a 
youth minister at his church and has 
been putting in upwards of 60 hours a 
week there each week. It is easy to 
understand why he couldn't keep up 
with a tough schedule like that and 
manage a national users group too. 

Because of the long hours and hard 
work performed by the likes of Brian 
Capouch, George Dorner, Dave Ka- 
leita, Carl Kreider, Bruce Warner, Joe 
Debuc and Steve Odneall — to name 
just a few — as well as a strong personal 
involvement with the growth of the 
group during my two years as president, 
I am sorry to report that many mail and 
other problems have created havoc for 
the OS-9 Users Group during the past 
seven or eight months. Vice President 
Bill Turner is digging in. He has a plan. 
The board of directors has been called 
to help for the first time in a year. 
Progress has been made on several 
fronts. Hopefully, recovery will be 
forthcoming soon. I have been investi- 
gating the problems for several weeks 
and have offered my help and several 
suggestions to Turner. 1 am studying his 
plan and will have further details next 
month. 

Next Month 

We've accumulated a number of ex- 
cellent tips from several sources for next 
month's column. Frank Malaney, the 
author of Prim Form, has offered some 
tips to help you use his shareware 
program we published in 1986 and we 
hope to have some Level 11 information 
for you by then. We'll cross our fingers 
again. In the meantime we have a few 
more utility programs from our readers 
to share with you. Keep 'em coming! 
Until May, enjoy. □ 



) 



case 0x0500: printf ("%-lls ", "Cobol") ; 

break; 
case 0x06^0: printf ("%-lls ", "Fortran"); 

break; 
default: printf ("%-lls ", "Reserved", lang) ; 



) 



printf ("%4d %4d %4X ", revs, attr, link); */ 

address +■ offset; /* Use the module address and */ 

get_name(revs, attr, link, address); /* calculate the physical address */ 



get__name(revs, attr, link, name_ptr) 
char revs, attr, link; 
char *name_ptr; 

( 

char narae[30] ; 
int i = 0; 
char c; 

do ( 

name(i++] = c = *name ptr+- 
) while (isprint(c) ) ; 
attr = *name_ptr; 
name[ — i] = name[i] S 0x7 f ; 
name[-+i] = '\0'; 
printf ("%4d %4d %4d ", revs, attr, link); 
Drintf ("%s\n", name); 
) 



/* Copy the char into storage 

/* Repeat until > S7F (high bit) 

/* Get edition byte 

/* Strip off the high bit 

/« Append NULL to the end 



Listing 6: strip. c 

char modidf] = "@ (#)strip.c 



/* 



OS-9 utility 



1.2"; 

strio 



* by Dennis J. Duke 

* Bessemer, Al. 

* 04 November 86 
* 

* Strip off unnecessary leading characters (new lines) created by the 

* Desk-Mate terminal program when downloading a file. 
*/ 

S include <stdio.h> 

FILE * fopen () , *fpin, * fpout; 

main (argc, argv) 
int argc; 
char *argv[]< 
( 

int c ; 

/* Check to make sure the utility was called properly */ 

if (argc != 3) ( 

fprintf (stderr, "usage: *s infile outfile\n", argvfp]); 

exit(0) ; 
) 

/* Make sure the input file exists */ 

if ((fpin = fopen (argv[l] , "r")) == NULL) ( 

fcirintf (stderr, "%s: can't open input %s\n", argv[0], argv[l]); 

exit(^); 
) 

/* Make sure the output file can be created */ 

if ((fpout = fopen (argv[2], "w")) == NULL) ( 

fprintf (stderr, "%s: can't open output %s\n", argv[0], argv[2]); 
exit(0) ; 

) 

/* Read the input file */ 

while ((c = getc(fpin)) != EOF) ( 

/* If the character is a "new line", skip it */ 
if (c == IP) 
continue; 

/+ Otherwise, output it */ 
putc (c, fpout) ; 
( 

/* Close the input and output files */ 

f close (fpin) ; 
f close (fpout) ; 
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THESE FINE STORES 
CARRY THE RAINBOW 

The retail stores listed below carry the rainbow on a regular basis and may have 
other products of interest to Tandy Color Computer users. We suggest you 
patronize those in your area. 



ALABAMA 




Birmingham 


Jefferson News Co. 


Brewton 


McDowell Electronics 


Florence 


Anderson News Co. 


Greenville 


M & B Electronics 


Madison 


Madison Books 


Montgomery 


Trade 'N' Books 


ALASKA 




Fairbanks 


Electronic World 


ARIZONA 




Phoenix 


TRI-TEK Computers 


Sierra Vista 


Livingston's Books 


Tempe 


Books Etc. 




Computer Library 


Tucson 


Anderson News Co. 


ARKANSAS 




Fayettevllle 


Vaughn Electronics/Radio Shack 


Ft. Smith 


Hot Off fhe Press Newsstand 


Uttte Rock 


Anderson News Co. 


CALIFORNIA 




Citrus Heights 


Software Plus 


Grass Valley 


Advance Raaio. Inc. 


Halt Moon Bay 


Sttawtlower Electronics 


Hollywood 


Levity Distributors 


Lompoc 


L8cH Electronics Emporium 


Los Angeles 


E.D.C. Industries 




Polygon Co. 


Sacramento 


Tower Magazine 


Santa Rosa 


Sawyer's News. Inc. 


Sunnyvale 


Computer Literacy 


COLORADO 




Westminster 


Software City 


DELAWARE 




Mlddletown 


Delmar Co. 


Mllrord 


Mlllord News Stand 


Wilmington 


Normar. Inc.— The Smoke Shop 


FLORIDA 




Boca Raton 


Software, Software, Inc. 


Cocoa 


The Open Door 


Davie 


Software Plus More 


Deltona 


Wilson Assoc, dba Radio Shack 


Ft. Lauderdale 


Electronics Engineers 




Mike's Electronics Distributor 


Jacksonville 


The Book Nook 




Book Town 




Deano'sTV 


North Miami 




Beach 


Almar Bookstore 


Orlando 


Book Mania 


Panama City 


Boyd-Ebert Corp. 


Pensacola 


Anderson News Co. 


Pinellas Park 


Wolfs Newsstand 


Sarasota 


Family Computers 


Starke 


Record Junction, Inc. 




Radio Shack Dealer 


Tallahassee 


Anderson News Co. 


Tampa 


Fine Print Bookstore 


Titusvllle 


Computrac 


GEORGIA 




Athens 


The Academic Resource Center. 


Bremen 


Bremen Electronlcs/Radlo Shack 


Jesup 


Radio Shack 


Marietta 


Act One Video 


Tcccoa 


Martin Music Radio Shack 


IDAHO 




Lewlston 


Books, Etc. 


Moscow 


Johnson News Agency 


ILLINOIS 




Aurora 


Kroch's & Brentano's 


Belleville 


Software or Systems 


Champaign 


Book Market 


Chicago 


B. Dalton Booksellers 




N. Wabash St. 




West Jackson St. 





Bob's in Newtown 


LOUISIANA 






Bob's News Emporium 


Crowley 


Acadlana Newsstand 




Bob's Rogers Park 


Monroe 


The Book Rack 




Book Market 








East Cedar 
North Cicero 
West Diversey 
E.B. Garcia & Associates 


MAINE 
Brockton 
Caribou 
Waterboro 


Voyager Bookstore 
Radio Shack 
Radio Shock 




Kroch's fli Brentano's 


MARYLAND 






South Wabash 


Silver Spring 


Layhill Newsstand 




West Jackson 








516 N.Michigan 

835 N. Michigan 
Parkway Drugs 
Parkwest Books 
Sandmeyer's Bookstore 
Univ. of Chicago Bookstore 
Univ. of Illinois Bookstore 
Vldeomat. Inc. 
Book Emporium 


MASSACHUSETTS 
Brockton 
Cambridge 
Rtchburg 
Ipswich 
Littleton 
Lynn 


Voyager Bookstore 
Out Of Town News 
Comers Book Shop 
Ipswich News 
Computer Plus 
North Shore News Co. 


Chillicothe 


Swansea 


Newsbreak, Inc. 


Danville 


Book Market 


MICHIGAN 




Decatur 


Book Emporium 


Allen Park 


Book Nook. Inc. 




K-Mart Plaza 


Dearborn 


DSL Computer Products 




Northgate Mall 


Durand 


Robbins Electronics 


East Moline 


Book Emporium 


Harrison 


Harrison Radio Shack 


Evanston 


Chicago-Main News 


Howell 


Howell Auto Parts 


Geneseo 


B & J Supply 


Lowell 


Curfs Sound & Home Arcade Center 


Kewanee 


Book Emporium 


Mt. Clemens 


Michigan Radio 


Lisle 


Book Nook 


Muskegon 


The Eight Bit Corner 


Newton 


Bill's TV Radio Shack 


Owosso 


C/C Computer Systems 


Oak Brook 


Kroch's & Brentano's 


Perry 


Perry Computers 


Oak Park 


Kroch's & Brentano's 


Royal Oak 


Software City 


Paris 


Book Emporium 


Sterling 




Peoria 


Book Emporium 


Heights 


Sterling Book Center 




Sheridan Village 


Trenton 


Trenton Book Store 




Westlake Shopping Center 


Wyoming 


Gerry's Book Co. 


Schaumberg 
Skokie 


Book Market 
Illinois News Service 
Kroch's & Brentano's 
Kroch's & Brentano's 


MINNESOTA 

Minneapolis 
Wlllmar 


Read-More News 
The Photo Shop 


Springfield 


Book Emporium 


MISSOURI 






Sangamon Center North 


Farmington 


Ray's TV & Radio Shack 




Town & Country Shopping Ctr. 


Jefferson City 


Cowley Distributing 


Sunnyland 


Book Emporium 


Kirksvllle 


T&R Electronics 


West Frankfort 


Paper Place 


Moberly 


Audio Hut 


Wheeling 


North Shore Distributors 


St. Louis 


Book Emporium 


INDIANA 






Computer Xchange 


Angola 


D & D Electronics 




Front Page News 




Radio Shack 


MONTANA 




Beme 


White Cottage Electronics 


Butte 


Plaza Book Store 


Columbus 


Micro Computer Systems. Inc. 


Whlteflsh 


Consumer Electronics of Whltefish 


Garrett 


Finn News Agency. Inc. 






Greenwood 


The Computer Experience 


NEBRASKA 




Indianapolis 


Bookland, Inc. 


Lincoln 


Hobby Town 




Delmar News 


NEVADA 






Indiana News 


Los Vegas 


Hurley Electronics 


Jasper 


Elex Mart 






Madison 


Arco Office Supplies 


NEW HAMPSHIRE 




Martinsville 


Radio Shack 


West Lebanon 


Verham News Corp. 


Wabash 


Mlttlng's Electronics 


NEW JERSEY 








Cedar Knolls 


Villoge Computer & Software 


IOWA 




Clinton 


Micro World II 


Davenport 


Interstate Book Store 


Marmora 


Outpost Radio Shack 


Ottumwa 


Southside Drug 


Montvale 


Software City 






Pennsville 


Dave's Elect. Radio Shack 


KANSAS 




River Edge 


Software City 


Topeka 


Palmer News. Inc. 

Town Crier of Topeka, Inc. 


Rockaway 


Software Station 


Wichita 


Amateur Radio Equipment Co. 


NEW MEXICO 






Lloyd's Radio 


Alamogordo 


New Horizons Computer Systems 






Albuquerque 


Desert Moon Distributors 


KENTUCKY 






Page One Newsstand 


Georgetown 


Goodwin Electronics 


NEW YORK 




Hazard 


Daniel Boone Gulf Mart 


Brockport 


Uft Bridge Book Shop. Inc. 


Hopklnsvllle 


Hobby Shop 


Brooklyn 


Cromland. Inc. 


Louisville 


The Computer Store 


Elmira Heights 


Southern Tier News Co.. Inc. 


Poducah 


Radio Shack 


Fredonla 


On Line: Computer Access Center 


Rkeville 


Ray's Furniture/Radio Shack Dealer 


Hudson Falls 


GA West & Co. 
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Johnson Cily Unicom Electronics 

New York Barnes & Noble-Sales Annex 

Coliseum Books 

Eastern Newsstand 
Grand Central Station. Track 37 
200 Park Ave.. (Pan Am #1) 
55 Water Street 
World Trade Center *2 

First Stop News 

Idle Hours Bookstore 

International Smoke Shop 

Jonll Smoke 

PennBook 

Software City 

State News 

Usercom Systems. Inc. 

Walden Books 

World Wide Media Services 



N. White Plains 


Software City 


Pawling 


Universal Computer Service 


Rochester 


Village Green 




World Wide News 


Woodhaven 


Spectrum Projects 


NORTH CAROLINA 


Aberdeen 


King Electronics 




Radio Shack 


Cary 


News Center In Cary Village 


Charlotte 


Newsstand Inf I 




Papers & Paperback 


Havlock 


Computer Plus 


Hickory 


C Books & Comics 


Marion 


Boomers Rhythm Center 


OHIO 




Blanchester 


JR Computer Control 


Canton 


Little Professor Book Center 


Chardon 


Thrasher Radio & TV 


Cincinnati 


Clnsoft 


Columbiana 


Fidelity Sound & Electronics 


Coshocton 


Utopia Software 


Dayton 


Huber Heights Book & Card 




Wilke News 


Falrbom 


News-Readers 


Kent 


The News Shop 


Kenton 


T.W. Hogan & Associates 


Lakewood 


Lakewood International News 


Lima 


Brunner News Agency 




Edu-Caterers 


Mlamlsburg 


Wlke News 


Mount Orab 


Mount Orab Radio Shack 


Rocky River 


Programs Unlimited 


Toledo 


Leo's Book & Wine Shop 


Xenla 


Fine Print Books 


OKLAHOMA 




Oklahoma 




City 


Merit Micro Software 


Taklequah 


Thomas Sales, Inc. dba Radio Shack 


Tulsa 


Steve's Book Store 


OREGON 




Portland 


Fifth Ave News 


PENNSYLVANIA 




Allison Park 


Software City 


Altoona 


Newborn Enterprises 


Brookvllle 


Larry's Stereo Shop 


Malvern 


Personal Software 


Philadelphia 


City Software Center 




Newsy 


Phoenlxvllle 


Stevens Radio Shack 


Pittsburgh 


All-Pro Souvenlers 


Pleasant Hills 


Pitt Computer & Software 


Temple 


Software Coiner 


Wind Gap 


Micro World 


York 


The Computer Center of York 


RHODE ISLAND 




Warwick 


Software Connection 



TENNESSEE 




Chattanooga 


Anderson News Co. 




Guild Books & Periodicals 


Dickson 


Highland Electronics 


Knoxvllle 


Anderson News Co. 




First Byte Computer Co. 


Memphis 


Computer Center 




Software. Inc. 


Nashville 


Mosko's Book Store 


Smyrna 


Delker Electronics 


Union City 


Cox Electronics Radio Shack 


TEXAS 




Brenham 


Moore's Electronics 


Elgin 


The Homing Pigeon 


Orange 


Northway Books & News 


UTAH 




Murray 


Deseret Book 


VIRGINIA 




Gafton 


Electronics Marketing 


Norfolk 


l-O Computers 


Richmond 


Software City 


WASHINGTON 




Seattle 


Adams News Co.. Inc. 


Tacoma 


B & I Magazines & Books 




Nybbles 'N Bytes 


WEST VIRGINIA 




Huntington 


Nick's News 


Logan 


Stan's Electronics 8c Radio Shack 


Madison 


Communications, LTD 


Parkersburg 


Valley News Service 


WISCONSIN 




Appleton 


Badger Periodicals 


Cudahy 


Cudahy News & Hobby 


Ladysmith 


Electronics. Etc. 


Milwaukee 


Book Tree 



Stettler Stettler Radio Shack 

Strathmore Wheatland Electronics 

Taber Pynewood Sight & Sound 

Westlock Westlock Stereo 

WetaskMn Radio Shack 



Booked Solid 

Booked Solid II 

Harvey Schwartz Bookshop 

Univ. of Wisconsin Bookshop 



SOUTH CAROLINA 

Charleston Hts. Software Haus. Inc. 
Gaffney Gaffney Book Store 

Greenville Palmetto News Co. 

Spartanburg Software City 
Union Fleming's Electronics 



WYOMING 




Casper 


The Computer Store 


ARGENTINA 




Cordoba 


Informatlca Y Telecomunicaclor 


AUSTRALIA: 




Kingsford 


Paris Radio Electronics 


CANADA: 




ALBERTA 




Banff 


Banff Radio Shack 


Blolrmore 


L&K Sports & Music 


Bonnyvllle 


Poul Tercler 


Brooks 


Double "D" AS.C. Radio Shack 


Calgary 


Billy's News 


Claresholm 


Radio Shack Associated Stores 


Drayton Valley 


Langard Electronics 


Edmonton 


CMD Micro 




Kelly Software Distributors 


Edson 


Radio Shack 


Falrvlew 


D.N.R. Furniture & TV 


Fox Creek 


Fox City Color & Sound 




ASC Radio Shack 


Ft. Saskatche- 




wan 


Ft. Mall Radio Shack. ASC 


Grande 




Cache 


The Stereo Hut 


Grande 




Centre 


The Book Nook 


Hlnton 


Jim Cooper 


Innlsfall 


L & S Stereo 


Leduc 


Radio Shack Associated Stores 


Lethbrldge 


Data t ran 


Lloydmlnster 


Lloyd Radio Shack 


Okotoks 


Okotoks Radio Shack 


Peace River 


Radio Shack Associated Stores 




Tavener Software 


St. Paul 


Walter's Electronics 



BRITISH COLUM8IA 


Burnaby 


Compulit 


Burns Lake 


VT. Video Works 


Campbell 




River 


TRS Electronics 


Chllliwack 


Charles Parker 


Ccortenay 


Rick's Music & Stereo 


Dawson Creek 


Bell Radio & TV 


Golden 


Taks Home Furnishings 


Kelowna 


Telesoft Marketing 


Langley 


Langley Radio Shack 


N. Vancouver 


Microwest Distributors 


Nelson 


Oliver's Books 


Parksvllle 


Parksvllle TV 


Penticton 


DJ.'s 




Four Corner Grocery 


Salmon Arm 


Matrix Computing 


Sidney 


Sidney Electronics 


Smlthers 


Wall's Home Furniture 


Squamlsh 


Kotyk Electronics 


100 Mile 




House 


Tip Top Radio & TV 


MANITOBA 




Altona 


LA Wiebr Ltd. 


Lundar 


Goran&on Elec 


Morden 


Central Sound 


The Pas 


Jodi's Sight & Sound 


Selkirk 


G.L Enns Elec. 


Virden 


Archer Enterprises 


Winnipeg 


J & J Electronics Ltd 



NEW BRUNSWICK 

Moncton Jeffries Enterprises 

Sussex Dewltt Elec. 

NEWFOUNDLAND 
Botwood Seaport Elec. 

Carbonear Slade Realties 

NOVA SCOTIA 

Halifax Atlantic News 



ONTARIO 




Aurora 


Compu Vision 


Concord 


Ingram Software 


Exceter 


J. Macleane & Sons 


Hanover 


Modern Appliance Centre 


Huntsvllle 


Huntsvllle Elec. 


Kenora 


Donny "B" 


Kingston 


T.M, Computers 


Uslowel 


Modem Appliance Centre 


South River 


MoxTV 




Dennis TV 


QUEBEC 




LaSalle 


Messageries de Presse Benja 


Pont. Rouge 


Boutique Bruno Laroche 


SASKATCHEWAN 




Assinlbola 


Telstar News 


Estevan 


Kotyk Electronics 


Moose Jaw 


D&S Computer Place 


Nlpiwan 


Cornerstone Sound 


Reglna 


Reglna CoCo Club 




Software Supermarket 


Saskatoon 


Everybody's Software Library 


Shellbrooke 


Gee. Laberge Radio Shack 


Tlsdale 


Paul's Service 


Unity 


Grant's House of Sound 


YUKON 




Whltehorse 


H & O Holdings 


JAPAN 




Tokyo 


America Ado, Inc. 


PUERTO RICO 




San Juan 


Software City 



Also available at all B. Dalton Booksellers, and selected Coles Bookstores, 
Waldenbooks, Pickwick Books, Encore Books, Barnes & Noble, Little 
Professors, Tower Book & Records, Kroch's & Brentano's, and Community 
Newscenters. 
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AD VERTISER INDEX 

We encourage you to patronize our advertisers — all of whom support the 
Tandy Color Computer. We will appreciate your mentioning the rainbow when 
you contact these firms. 



Alpha Products 21 

Bytes Bits & Chips 146 

Canyon County Devices 89 

Cer-Comp 39 

Challenger 135 

Cinsoft 33 

CNR Engineering 85 

Cognitec 61 

Colorware 22,23 

Computer Center 35 

Computer Friends 16 

Computer Island 133 

Computer Plus 3 

Computerware 50, 51 

C.R.C. Computers 179, BC 

D.P. Johnson 193 

Dayton Associates of 

W. R. Hall, Inc 128 

DerringerSoftware. . .65, 93, 141 

Diecom IFC 

Delphi 122, 123 

Duck Productions 87 

F.M. Technology 199 

Fazer Electronics 33 

Federal Hill Software 31 

Floppy Source, The 104 

Gimmesoft 145 

Hard Drive Specialists 153 

Hawkes Research Services . . .58 



Hemphill Electronics 15 

HJL div. of Touchstone 

Technology, Inc 25 

Hogg, Frank Laboratories . . .203 

Howard Medical 34, 210 

Inventive Solutions 177 

J & M Systems 126, 139 

J & R Electronics 134 

Kelly Software 

Distributors 181 

Metric Industries 13 

Micro Works, The 171 

Microcom Software 9, 11 

Microtech Consultants 

Inc 81 

MicroWorld 103 

Moreton Bay 163 

Novasoft 55 

NRI Schools 77 

Other Guys Software, The 57 

Owl-Ware 96, 97 

Perry Computers 187 

Preble's Programs, Dr IBC 

Prickly-Pear Software 159 

PXE Computing 7 

Radio Shack 113, 115 

Rainbow Adventure 

Book III 191 

Rainbow Bookshelf 209 



Rainbow Gift Subscription ...17 

Rainbow Guide To OS-9 100 

Rainbow On Disk 168 

Rainbow On Tape 110 

RAINBOWfest 106, 107 

RAINBOWfest Tape 48 

Saguaro 111 

Seca 191 

Selected Software 169 

Software House, The 143 

Soft Sector 49 

Spectogram 195 

Spectrosystems 155 

Spectrum Projects 

Inc 67,69,70 

Speech Systems 

41, 42,43, 44, 45 

Sugar Software 165 

Sunrise Software 195 

T & D Software 63 

Tepco 92 

Tom Mix Software 54 

True Data Products 150,151 

Woodstown Electronics 144 

Zebra Systems 119 




mi Call: 



Shackleford, Nolan, Davis, Gregg and Associates 

Cindy Shackleford, president 

Marian Nolan Carpenter 

Advertising Representative 

P.O. Box 725 

51 6-1 89th St Court East 

Spanaway, WA 98387 

(206) 847-9901 



Call: 

Kim Vincent 

Advertising Representative 

The Falsoft Building 

9509 U.S. Highway 42 

P.O. Box 385 

Prospect, KY 40059 

(502) 228-4492 



Call: 

Jack Garland 

Garland Associates, Inc. 

10 Industrial Park Road 

Hingham, MA 02043 

(617) 749-5852 
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Recommended Reading for Your CoCofrom . . . 

The Rainbow Bookshelf 
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The Complete Rainbow Guide to OS-9 

The book that demystifies the state-ol-the-art operating system lor 
the Tandy Color Computer. Authors Dale L. Puckett and Peter Dibble 
show you how to take advantage of OS-9's multitasking and multi- 
user features, and the capability of redirecting input and output 
commands at will. An easy-to-read, step-by-step guide packed with 
hints and lips, tutorials and free software in the form of program 
listings. 
Book $19.95 
Disk Package $31 (2 disks, book not included) 



The Second Rainbow Book of Adventures 

This sequel features 24 of the most challenging Adventure games 
ever compiled. Meet the Beatles and battle the Blue Meanies, find 
a hidden fortune, or win the heart of a beautiful and mysterious 
princess. Experience the thrills and chills of the most rugged 
Adventurer without ever leaving your seat. Ring Ouesf, Secret Agent 
Man. Dark Castle, Curse or Karos, Island and more! 

Book $13.95, Tape $13.95 




The Rainbow Book ol Simulations 



Features 20 award-winning entries from the rainbow's first 
Simulation programming competition. You are the Commander-in- 
Chief of the Confederate Army during the Civil War, an air traffic 
controller at one of the nation's busiest airports, the owner of your 
own software business, a civil defense coordinator in charge of 
saving Rainbow City from a raging flood, a scientist conducting 
experiments on Mars . . . Your wits are on the line. 
Book $9.95, Tape $9.95 



The Second Rainbow Book of Simulations 

The 1 6 winning programs from our second Simulation contest. Fly through the dense African 
jungle as a bush pilot, bull your way down Wall Street, lead the Rainbow City bomb squad, 
or try your hand at Olympic events. Test your skills and talents. 
Book $9.95, Tape $9.95, Disk $10.95 



Coming Soon: The Rainbow Introductory Guide to Statistics 



■ 



/ want to start my own Rainbow Bookshelf! 

Please send me: 

The Rainbow Book of Simulations $ 9.95 

D Rainbow Simulations Tape $ 9.95 

□ The Second Rainbow Book of Simulations $ 9.95 

□ Second Rainbow Simulations Tape $ 9.95 

D Second Rainbow Simulations Disk $10.95 

D The Complete Rainbow Guide to OS-9 (bookoniy) $19.95 

D Rainbow Guide to OS-9 Disk Package |2disks) $31 .00 

D The Rainbow Book of Adventures (first) $ 3.50 ^$-t"35 

D Rainbow Adventures Tape (first) $ 3.50 %J^~^ 

D The Second Rainbow Book of Adventures $13.95 

D Second Rainbow Adventures Tape $13.95 

Add $1 .50 per book Shipping and Handling in U.S. 

Outside U.S., add $4.00 per book 

Kentucky residents add 5% sales tax 

(Allow 6 to 8 weeks for delivery) Total 



Name 



Address 
City 



State 



ZIP 



D Payment Enclosed, or □ Charge to: 
□ VISA □ MasterCard □ American Express 



Account Number 



Card Expiration Date 
Signature 



Mail to: Rainbow Bookshelf, The Falsoft Building, P.O. Box 385, Prospect, KY 40059. 

Pimm nolo Ik lapei ml dim otfifad by Tin Rainbow Oookihall ire nol aland-alone producii. Tnel n, Uwy ire inun-jod u»in adjunct mil complamenl lo me boom. Even il you buy Uw i«f.a or dm, 
you will Kill need me appropriaie book. OS-8* is a reniahxed uedemart ol inu Mlcoxaro Syilanu Cotpwation. 

To order by phone {credit card orders only) call (800) 847-0309, 8 a.m. to 5 p.m. EST. For other inquiries call (502) 
228-4492. 



Save $100 on Magnavox Monitors 
Magnavox CM8505 RGB Analog only $198!! 




MONITORS 




123A 12" 



$67.50 

REPACK 



122A Zenith 12" Amber Screen offers 
Ihe same 640 dots x 200 dots resolu- 
tion at 15MHz as the 123A and a 90-day 
warranty valid at 1200 locations. 



$88 



('7 shipping) 

MAGNAVOX 
8 CM 515 has 

analog RGB for CoCo 3, TTL RGB 
for Tandy 1000 or IBM PC's, and 
composite color for CoCo 2 and 3. 
Built-in speaker. 14" screen with 
640 dot x 240 line resolution. Plus 
2 years parts and labor warranty. 

reg. list S499 

SAVE 
$100 



This 12" green screen high resolution 
monitor offers 80 column capability, 
Zenith quality and a 30-day warranty 
valid at any of Zenith's 1200 locations. 

Retail S149 
Our price 
(S7 shipping) 

All monitors require an amplifier cir- 
cuit to drive the monitor and are 
mounted inside the color computer. 
They attach with spring connectors 
with two wires extending out of the 
computer, one for audio and one for 
video. CoCo 3 does not require an 
amplifier circuit. 

VA-1 for monochrome monitors only, 
fits all color computers 



$24. 4 5 

ime or color, fits all 

$39. 45 



$298 




(»2 shipping) 

VC-4 for monochrome or color, fits all 
color computers 
(S2 shipping) 

MASNAVOX 

CM 8505 hasanalog 
RGB and TTL RGB and composite 
color input. Built in speaker. 13" 
screen with 390 dots x 240 
resolution in RGB mode. Plus 1 
year parts & labor warranty. 



+ S14 Shipping 

CC-3 Magnavox RGB cable. 

only ' I 5J.SjO with 
Magnavox Monitor order. 
S29.95 w/o monitor. 



reg. list S299 

SAVE 
$100 

$198 

+ S14 Shipping 






UHIVC \J i ■ Howards Drive gives you a 
DD-3 MPI drive, a CA-1 cable and a J&M DC-4 Disk Controller 



for only 



$178*5 

( s 5 shipping) 
Add $34 for a Disto DC-3. 



DOUBLE SIDED 
DOUBLE DENSITY 

360K 



GUARANTEE 

Howard Medical's 30-day guarantee is meant to eliminate the uncertainty- 
of dealing with a company through the mail. Once you receive our hard- 
ware, try it out; test it for compatibility. If you're not happy with It for any 
reason, return it In 30 days and we'll give you your money back (less 
shipping.) 

Shipping charges are for 48 states. 
APO and Canada order slightly higher. 



DISK CONTROLLER 



pist* 



Includes controller and C-DOS 4.0 
ROM Chip. 

$98 

S2 shipping on all DISTO products 



ADD-ON BOARDS 



DC-38 Includes 80 column capacity, 
parallel printer, real time clock, and all 
software $138 

DC-256 2S6K RAM Board includes 
software to access all RAM$4 OE 

DC512 512K RAM Board with 
software $165 

DC-3C Clock Calendar and parallel 
printer port $40 



DC-3P Mini Eprom programmer in- 
cludes all software to program 2764 
or 27128 chips $55 

2764 8K Eprom 28 pin 

$8 50 each 

27128 16K Eprom 28 pin 

$8 50 each 

C-DOS 3 28 pin Eprom makes Disto 
controller compatible with CoCo 3 

$20 



SOFTWARE SPECIALS 



Payrol/BAS T 



(»2 shipping) 

• Nonprotected basic modifiable 

• Tax tables built in for automatic 
state and federal calculation 

• Custom code for every state 

• 4 pay periods 

• 7 deductions 

• Prints checks 

• 100 employees 

• 30 ledger numbers for checks 
other than payroll 

• Check register includes monthly 
or weekly federal deposit amount 

• Enter, update, delete employees, 
company and check Information 

• Print payroll and nonpayroll 
checks 



Payrol/BAS™ 
30 Day Trial 

$79-95 



VIP LIBRARY 

Softlaw's integrated package in- 
cludes VIP writer terminal, data 
base, call and disk zap which can 
fix a diskette that is giving I/O 

$125 

(>2 shipping) 



MEMORY 

Memory for CoCo 3 PC memory 
board plugs into the spare slots in- 
side the computer and can be 
populated with 256K ram chips. 
Completely solderless with com- 
plete easy to install Instructions. 

$49.50 

PC Memory board with 256K«99 
PC Memory board with 512K s 118 

Software spooler and RAM disk 
for lightning quick response or no 
disk swapping drive backup for 1 
drive system and printer spooler to 
free computer during long listings. 

$19.45 

(S2 shipping on Memory 
products) 



64-2 for CoCo 2. Kit requires one 
solder point, no trace cuts. 

(<2 shipping) $24.45 

64-E1 for E Boards with complete 
Instructions. Remove old chips 
and replace with preassembled 
package— no soldering or trace 
cuts. 

( s 2 shipping) 28.45 

64-F1 for F Boards. No soldering 
needed. Capacitor leads must be 
cut. 

(«2 shipping) $24.45 

64-22 Two chip set for 26-3134A 
and B, 26-3136A and B. Koren Col- 
or Computers require 1 solder 
point. 

(•2 shipping) 28.45 



Howard Medical Computers 1690 N. Elston Chicago, IL 60622 




ORDERS 



(800) 443-1444 



INQUIRIES AND ORDER STATUS 

(312) 278-1440 



in M 



ACCEPT: VISA • MASTERCARD • AMERICAN EXPRESS 
HI I PO.'S 



Dr. Preble's Programs & 
Striking A Blow Forj ^\ 




". . . Freedom is nothing else but a chance to be better . 

— Albert Camus 



*** Mental Freedom *** 

for CoCo 1, 2 and 3! 

A Thought-Controlled Video Challenge 

We call il The Preble Thoughtware. 

DOES GREEN BLOOD flow in your veins like Mr Spock? Is your mind well 
ordered? Or is your mind a mass of conflicting emotions like most 
humans? 

THOUGHTWARE may answer these questions and more. 

IMAGINE! Some day, a computer so advanced that it responds to your very 
thoughts and emotions. Imagine, some day, thought-controlled 
graphics: levitation and materialization! 

PLUG IN YOUR MIND and UNHOOK YOUR JOYSTICKS — that day is 
now! The Radio Shack Color Computer has many ad- 
vanced capabilities, just waiting to be tapped. Dr. Preble's 
Programs combines the advanced technology of the CoCo 
with the amazing Radio Shack BIOFEEDBACK MONITOR 
to bring you "Preble Thoughlware." 

THOUGHT-CONTROLLED VIDEO CHALLENGE? Unlike any 
video game you have ever played, Thoughtware tests your 
ability to handle stress, to remain calm under adverse 
circumstances. 

LIGHTNING FAST reflexes will do you no good here, unless you 
first tame the fickle dragon of your mind. 

DO YOU HAVE SELF-CONTROL? Many people can keep a 
"Poker Face" even when they are worried so that others 
may not notice; but can you really stop the worry itself? Thoughtware 
will find out! 

AND IT TALKS! Did you know that the CoCo can produce incredibly realistic 
digital speech without a special speech synthesizer? And I mean really 
high quality speech! Forget the mechanical robot voice. This voice 
quality is so good, it sounds human! Honest. Best of all, no extra 
hardware is needed for speech. None. The CoCo produces this amazing 
digital speech all by itself (with a wee bit of programming by Dr. Preble). 

THOUGHTWARE — Next time your Iriends ask what your computer can do, 
show them the Preble Thoughtware! 

Requires Radio Shack's Biofeedback Monitor Catalogue »63-675 

The Preble Thoughtware — TAPE $27.95 • s/h, on DISK $29.95 ♦ s/h 





*** Basic Freedom *** 

for The Color Computer 3 
(with versions for CoCo 1 & 2) 

A Full Screen Editor for BASIC Programming 

We call it EDITOR 3. Chris Babcock wrote a pure, efficient Machine Language 
program to open a new dimension of ease and power for anyone typing in 
a BASIC program. 

Here are your BASIC Freedoms! 

FULL CURSOR MOVEMENT — Use the arrow keys to move anywhere on a 
screen. If you are using a Color Computer 3. then even the 40 or 80 
column screen is supported! 

INSERT. CHANGE or DELETE CHARACTERS anywhere on the 
screen. Simply move to what you wish to change, change 
it and continue working! 
LOWERCASE COMMANDS are OK! EDITOR 3 lets you type in 
lowercase any time or all the time. Lowercase command 
words are automatically translated to uppercase for BASIC. 
Of course, lowercase text within quotes stays lowercase. 
This is great when typing wiht the CoCo 3's 40 or 80 column 
mode with true lowercase! 
MERGE LINES within a program with just a few keystrokes! 
AUTO KEY REPEAT — Hold down any key and it will repeat. 
INVISIBLE — Once EDITOR 3 has been loaded in, it is activated 
with a single keystroke! It hides itself out of the way of other programs 
and can be turned off any any time. Pressing RESET will not hurt 
EDITOR 3! 
EASY TO USE — Installation takes seconds! Well-written goof-proof manual 

included. 
COCO I & 2 — Yes. even though this program was conceived for the powers 
of the new CoCo 3. we still support the previous Color Computers. They 
too. need their BASIC Freedom! 
EDITOR 3 — So easy and handy, you'll never want to run your CoCo without 

it! 
Available on DISK only for CoCo 3 @ $29.95 * s/h 

CoCo 1/2 version can not support 40 or 80 column screens. CoCo 1/2 version 
is available on TAPE for $27.95 * s/h or DISK for $29.95 + s/h. 



Also Available for CoCo 1 & 2 only: 

VDOS, the UnDISK: Save multiple programs in memory! Works with or without a disk 
drive. TAPE $27.95 ■* s/h, DISK $29.95 + s/h 

VDUMP, for the UnDISK: Save multiple programs in a single file! $14.95 + s/h on tape. 
VPRINT, for the UnDISK: Printout UnDISK Directory! $9.95 + s/h on tape. 



Check. Money Order, MasterCard, VISA or COD accepted. For Shipping to USA and 
Canada add $1 .50, to other countries add $5.00. 



Order From 
Dr. Preble's Programs 

6540 Outer Loop 

Louisville, KY 40228 

(502) 966-8281 

Technical questions answered 
Monday. Wednesday, Friday 
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